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ABSTRACT 


THIS PROGRAM IS DESIGNED TO BE AC IVE CHECK OF THE 
Trl pet tet DRIER Tu see MADRE 
tie LopP TRE BOX, MET MEMORY, THE UNIBUS, AND 
THE MASS BUS. IF NOT DESELECTED THE’ PROGRAM RELOCATES THE 

MEMORY (0-2M). ALSO, IF NOT DESELECTED 


TEST C 
THE PROGRAM WILL RELOCATE USING ° AVAILABLE g 
(RPO, RKOS, RPOM, RSO3/4). SEE SECTION 9.5 FOR A DESCRIPTION OF 


THE MAIN DIFFERENCES BETWEEN REVISION A AND REVISION B pee 
ROUTINES TO USE THE UBE AND MBT (MANUFACTURING ONLY), WORS 
CASE TESTING OCCURS WITH ALL SWITCHES DOWN, STANDARD SYSMAC 


MACROS, AND FLOATING POINT PROCESSOR TESTS. 

ALSO, THE DISK DRIVER WAS REWRITTEN TO MAKE EACH DEVICE HAVE A 
MODULAR DRIVER AND TO CAUSE 170 TO OCCUR CONC Y ON THE 
PETERS DISKS. (SEE SECTION 9.5.4 FOR A DESCRIPTION OF DISK 
DRI ) 

SINCE WORST CASE TESTING NOW OCCURS WITH ALL SWITCHES DOWN 

PRECAUTIONS Mal BE TAKEN TO ENSURE THE PROTECTION OF USER 
DISKS. REFER TO SECTION 7.0 FOR A DESCRIPTION OF WARNINGS AND 
EXCEPTIONS. 

REQUIREMENTS 

EQUIPMENT 

POP-11770 PROCESSOR WITH 16K OF MEMORY, A LINE CLOCK, 


AND AN LASO (OR EQUIVALENT) CONSOLE. 
OPTIONAL EQUIPMENT USED 


: une cteER 
; RPL RKII/RKOS, RH70/RPO4, RH70/RSO3/RSO4 
4. FP11-B, FP1I-C 


STORAGE 


LOADS INTO THE FIRST 12K OF MEMORY AND 
OF THE XXDP MONITOR IF RUNNING IN CHAIN 


THE PROGRAM 
ey (EXCLUSIVE 


PRELIMINARY PROGRAMS 
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ADVISABLE THAT THE CPU CLUSTER (AND FLOATING POINT) 
DIAGNOSTICS RUN FIRST. THESE CONSIST OF: 


pees hit 


METHOD 

THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC MEDIA. REFER TO THE 
XXDP OPERATING MANUAL FOR FURTHER INFORMATION. 

STARTING PROCEDURE 

CONSOLE SWITCH SETTINGS 

SEE SECTION S.1 

STARTING ADDRESSES 

THE STARTING ADDRESS FOR THE EXERCISER IS 200. 

PSTN SORES 0, ST tS We DT 
4 eR ea 


Q THE ese REGISTER All 


SWITCHE EBRRESPONDING LIGHTS IN THE DISPLAY 
REGISTER. 

TARTING AT 14 MICRO-BREAK REGISTER CAN BE 
GreckeD. BD. et THIS Tee TEST REQUIRES A MAINTENANCE CARD. SEE SECTION 


PROGRAM AND OPERATOR ACTION 


3. ey PROGRAM INTO (SEE SECTION 3) 
° FOR ANY SYSTEM DISK PACKS OR CONFIGURATION 
TIONS AS DESCRIBED IN SECTION 7.0. 


200 
(SEE SECTION S.1) 
MESSAGES WILL BE 


WILL LOOP T 
OF EACH SUB-PASS EACH PASS. (SEE SECTION 
A DESCRIPTION OF THE MESSAGES) 


YPED AT THE 
8.3 FOR 
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OPERATING PROCEDURE 
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SW13 


SW1e 


SW11 


SW10 


HALT ON ERROR 


LOOP ON TEST 


INHIBIT ERROR 
TYPEOUT 


INHIBIT UBE 


Ber ETERATION 


RING BELL 
ON ERROR 


LOOP ON ERROR 


RELOCATE WITH 
CPU ONLY 
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THIS SWITCH WHEN SET WILL HALT 
THE proneoson WHEN AN ERROR I 
DETECTED. PRESSING CONTI 
WILL CAUSE AN ERROR MESSAGE TO 
BE TYPED AND THE PROCE 
WILL AGAIN HALT. 

CONTINUE AGAIN WI 

TESTING. 

THIS SWITCH WHEN 

CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 


THIS SWITCH SET INHIBITS 
THE ERROR TYPEDUT: 


THIS SWITCH WHEN SET INHIBITS 

iF aus INITIALIZATION OF THE 
BUS EXERCISER. SEE SECTION 

oie Foe fe 1 6 DESCRIPTION OF THE 


Laas Ft 
EXECUTED 16 10° TES BEFORE ie 
ST ae et sr AD 


THIS SWITCH WHEN SET WILL RING 
ore eo FE WHEN AN ERROR IS 


TO LOOP 
atom: 
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DESCRIPTION OF RELOCATION. 
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SW? INHIBIT SYSTEM 
SIZE TYPEOUT 
SW INHIBIT RELOCATION * 
SUS INHIBIT ROUND 
ROBIN 
SWH INHIBIT RANDOM 
DISK ADDRESS 
SW3 INHIBIT MBT 


SWe-SWO DEVICE CODES 
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USOT wee ge He 


a 5 
pret ie nes 


OCCURS ons 
DUMPED) 

THIS SWITCH WHEN SET WILL 
INHIB? RELOCATION. DO 


NOT CHANGE THIS SWITCH ~ WHILE 
THE PROGRAM IS RUNNING. 


BUTS SUT TCH EN Set MILL OMY 


te sutton WILL 

OGATION. iy SET HAYS 
CTART AT ADDRESS ON 
DISK(S). 


THE 
TS SET INHIBITS 
oe he 


ON eer "3 
ION THE : 


THESE SWITCHES (ALONG WITH 
CAUSE THE PROGRAM TO 

RELOCATE THE TEST CODE USING 

THE DEVICE SPECIFIED BELOW: 


VALUE DEVICE 
0 RP11/RPO3 
2 NOT USED 
; NOT USED 
5 RH70/RS03/RSO4 
: NOT USED 
NOT USED 
* u’e:B>) 10 are Pey See 
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UNIT 0 OF THE LOAD DEVICE IS MARKED NOT 
PRESENT IF PROGRAM WAS LOADED IN CHAIN 
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MODE BND THEREFORE WILL NOT BE USED TO 
RELOCATE 


DISPLAY REGISTER 


WHILE THE PROGRAM IS RUNNING. THE LOW BYTE OF THE DISPLAY 
REGISTER CONTAINS THE SUBTEST NUMBER AND T 
CONTAINS BITS <14:7> OF KERNEL Pat THESE BIT 
PARO CORRE TO 8 : I 
THE RELOCATED CODE. WHE 
ERROR IS SELECTED, THE HIGH BYTE CONTAINS THE ERROR COUNT. 
OPERATOR ACTION 


ZERO THE’ PROGREN IL % AND 
0 THE PROGRAM WILL OUT T 
i 


Uae RELOCATI F 
TER.  _THI TO ALLOW THE OPERAIOR TO WRITE 
PROTECT ANY DRIVE THAT IS NO ARE 


DEVICES AVAILABLE FOR RELOCA 1 
REQUIRED.. 


IF Ee 
WRITE 
RELOCATI 


EXCEPT CHAIN MODE, GV(MANUFACTURING ONLY), 
(MANUFACTURI ‘Ss ONLY) 


Ae a IS LOADED VIA ACTI1 IN QV OR 
1 OPERATOR ACTION IS REQUIRED AND ALL 
ae CTED (EXCEPT FOR THE XXDP MEDI 


IF BN ERROR 1S 1S {PETECTED, ne Pa PROGRAM RAM WILL TRAP a THE ERROR 
BROCE Sco OR WILL ATT HALT T. Bling? FONT INUE WELL OR Dice BN ERROR 
MES TO BE TYPED AND PROCESSOR WILL HALT AGAIN. 


THERE ARE MANY DIFFERENT OF ERRORS. NO MATTER WHICH 
TYPE OCCURS A MINIMUM SET OF INFORMATION IS TYPED AS FOLLOWS: 


MM: SS 
ERRORPC ner i PC ates MAINT TEST NO SUB-PASS CNT 
UUUUUU XXXXXX YYYYYY SSSSSS PPPPPP 


= VIRTUAL PC OF THE ERROR CALL. 
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384 VVVVVVVV ss = PHYSICAL PC_OF THE ERROR CALL. 
385 WWW = PSW AT THE TIME OF THE ERROR CALL. 
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XXXXXX = CONTENTS OF THE MAINTENANCE REGISTER( 17777750). 
YYYYYY : 
SSSSsS = SUB-PASS COUNT (0 THRU 5) 
PPPPPP = PASS COUN 
HHH:MM:SS REPRESENTS THE ELAPSED RUN TIME OF THE PROGRAM, SINCE 
THE MOST. PREVIOUS START, KHERE: = HOURS, MM = MINUTES, 


THE VIRTUAL PC IS THE 16 BIT WORD_THAT WAS PUSHED ON THE STACK 
WEN Ae He uo uw o WAS MADE. THE PHYSICAL PC IS CALCULATED 


1. IF MEMORY MANAGEMENT IS OFF THE CONTENTS OF_ LOCATION 
“FACTOR IS SUBTRACTED eRe oe THE VIRTUAL PC. THIS 
GENERATES THE CORRESPONDING PC FOR THE NON-RELOCATED CODE. 


2. IF MEMORY MANAGEMENT IS ON THE CONTENTS OF THE APPROPRIATE 
PAR IS FTED AND ADDED TO THE VIRTUAL PC TO GENERATE A 
PHYSICAL 22 BIT ADDRESS. IN THIS CASE THE VIRTUAL PC 
CORRESPONDS TO THE NON-RELOCATED CODE. 


THE CONTENTS OF THE MAINTENANCE REGISTER WILL INDICATE WHAT 
MEMORY MARGIN WAS BEING PERFORMED WHEN THE ERROR OCCURRED. 


DEPENDING ON THE TYPE OF ERROR ADDITIONAL INFORMATION IS TYPED 
AS DESCRIBED BELOW. 


UNEXPECTED TRAP TO 4 


PCOFTP —PHYSPC PSW CPUERR 

VVVVVV PPPPPPPP YYYYYY 222222 

VVVVVV = ~ He ee THAT WAS PUSHED ON THE STACK WHEN THE 
PPPPPPPP = oo PC CALCULATED AS a ABOVE. 

YYYYYY = PSW_THA wes fe HED ON THE STA 

222222 = CONTENTS OF CPU ERROR REGISTER(17777766). 


UNEXPECTED TRAP TO 114 
PCOFTP spi PSW GRaRS ERR ADR REG 
VVVVVV —- PPPPPPPP YYYYYY 2222 EEEEEEEE 


reread = " 3 Gonrents'9 OF PTE REFORY ERROR Redister (777 
EEEEEEEE = CONT 


REGISTERS. COMBINED 
INTO a 32 ora ODRESS ¢ (779790 a 3797 


PARITY ERROR DURING DATA CHECK 


THIS ERROR CAN ONLY OCCUR DURING THE DATA CHECK THAT IS MADE 
ON THE RELOCATED TEST CODE BEFORE IT IS EXECUTED. THIS CHECK 





a re i ee ee ae 


' MAINDEC-1 
CEQKCE.P1 


43 


ees POP 11/70 CPU EXERCISOR MACY11 27(732) 14-OCT-76 10:46 PAGE 14 


IS MADE BY COMPARING THE UNRELOCATED CODE WITH THE RELOCATED 
CODE. THE SOURCE DATA REFERS TO THE UNRELOCATED CODE AND THE 


es 
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DESTINATION DATA TO THE RELOCATED CODE. 


SRCADR OSTADR EADRREG MEM ERR REG 
SSSSSS DDDDDDDD EEEEEEEE 222222 


Ssssss = 
DDD: = I DESTI 

EEEEEEEE  ## = CONTENTS OF THE ERROR ADDRESS REGISTERS 
222222 = CONTENTS OF ERROR REGI A 
ERROR DURING DATA CHECK-RELOC WAS BY CP 


THIS ERROR IS SIMILAR TO 6.1.3 orn INSTEAD OF A PARITY 
ERROR, IT IS_A DATA COMPAR LS 2s cl . REFER TO SECTION 9.5.3 
FOR A’DESCRIPTION OF CP RELOCATION. 


sonal ” ERROR (SW<9>) BEET ent OFF FOLLOWING EFFECT: 
+ try ga ak IS SET, LOOPING 


sil oF he eee HME seer eeTON ILL 


PERFOR ON THE PROGRAM RELOCATION (SEE SE 
9.5.2) TO THE MEMORY SPACE THAT FAILED. IF 
1S "NOT SET, PROGRAM RELOCATION WILL BE RETRIED I 
SAME MEMORY’ SPACE. 


ERROR DURING DATA CHECK-RELOC WAS BY 1/0 


THIS ERROR IS THE SANE AS 6.1.4 EXCEPT RELOCATION WAS 

VIA A DISK RATHER THAN CP. THE ERROR PRINTOUT 
aT I IFY WHICH DEVICE AND DRIVE NUMBER TRANSFERRED THE 
PARTICULAR WORD THAT FAILED. REFER TO SECTION 9.5.4 FOR A 
DESCRIPTION OF I/0 RELOCATION. 


LOOP ON ERROR (SW<9>) HAS THE FOLLOWING NG EFFE 
1. a at? 1S SET, THE Devine The WORD 
CAUSED THE DATA CHECK MATE Hs INITIATED TO DO 


The 38 cane TRAN oo ecee. WITH AND 
THIS uiue PONTING TNUALLY BE 
INITIATED AND CHECKED UNTIL SW<9> IS NOT SET. © 
DEVICE ERROR 
THIS ERROR OC IF_A DEVICE ERROR WHILE THE DEVICE IS 


DOING AT ER. THE DEVICE AND DRIVE NUMBER ARE IDENTIFIED 
AND THE CONTENTS OF THE DEVICE REGISTERS ARE TYPED. : 


WHEN SW<S> (L GN ERRORS IS SET, THE DEVICE THAT FAILED - IS 
CONTINUALLY RESTARTED WITH THE’ SAME DISK ADDRESS, MEMORY 
ADDRESS, AND FUNCTION THAT CAUSED THE ERROR. 
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500 IF SW<9> IS NOT SET, RELOCATION IS RESTARTED. 


501 


Serine ks 


UNL UU UU UU 


= 2 b= bs b= 2 = be po ho 
OCD YOU .£ ITU) 
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UNIBUS EXERCISER FAILED . 
cc BUSADR CRe - CRI PHYS BUS ACR 





XXXXXX = VVVVVV Wot bs vali YYYYYY 22222222 
XXXXXX = cycle . 
VVVVVV = VIRTUAL SS THAT P iis UBE FAILED AT 
drinitidd = CONTROL REGISTER NUMBER 2 
22zEL022 = PHYSICAL HENORY ADDRESS THA 
= PHYSICAL MEMORY T THE UBE FAILED AT 


THE ICAL ee TS. CALCULATED BY ADDING THE 
REPROPRIATE MAP RECT MAP REGISTER T . VIRTUAL BUS ADDRESS, FORMING A 








ST 
nnsaan GGGGGG 
a] 
HHHHHH 
ARRAAA a (760100). 
‘. 
(760174). 
aa ie eeo1 10) 
RHKHAR : at 4). 
IJIIII GISTER #3 (760175). 


MBT NON-EXISTANT MEMORY ERFOR 


THIS IS OS 6.1.7 EXCEPT THAT IT IS DETECTED BY THE 
NEXM bir tN eo OF THE 


FLOATING POINT a 
gs ERage WI a on Ee LOT am Ra 0 Site 
ie phoart ING POI Nr IDENT igs A Py TT RORee BATH ye pre Ted 


THIS ener SHOULD ONLY BE A FUNCTION OF THE FLOATING POINT 
PROCE AND THE DIAGNOSTICS (DEFPA DEFPB) SHOULD BE USED 
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Tu ISOLATE THE PROBLEM. 
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DEVICE HUNG 
THIS ERROR elite OCCUR IF A DEV DOES NOT FINISH ITS 
TION FUNCTION WITHIN 2 SecbNng TER ITS INITIATION. IF 
A LINE CLOCK IS NOT INSTALLED, A HUNG DEVICE WILL HANG THE 
TO SECTION 9.5.4.4 TO DETERMINE WHICH DEVICE 
AND DRIVE 1S HUNG. 


ERROR RECOVERY 


DIFFERENT TYPES OF ERRORS RECOVER IN DIFFERENT WAYS AS 
DESCRIBED BELOW. 


ERRORS WITHIN SUBTESTS 
EPI ION STARTS WITH THE INSTRUCTION FOLLOWING THE ERROR 


RELOCATION WITH MEMORY MGMT. OFF 

EXECUTION STARTS AT THE BEGINNING OF THE NEXT SECTION. 

DEVICE ERROR OR CP RELOCATION WITH MEMORY NGMT. ON 

RELOCATION IS RESTARTED. 

UNEXPECTED TRAPS EXCEPT PARITY (4, 10,250) 

EXECUTION STARTS AT THE ADDRESS POINTED TO BY LOCATION 
THIS LOCATION ah | THE ADDRESS+2 OF THE MOST 

RECENTLY EXECUTED “SCOPE” INSTRUCTION. 

UNEXPECTED PARITY ERROR 

IF THE PARITY ERROR IS FATAL (BIT 2 OR 3 SET IN ERROR REG) THE 

ON criets' aS hee AT RESTARTS. OTHERWISE, 


WARNINGS AND EXCEPTIONS 


ay VE THAT TE ae ner witnko no 
UNIT 0 THE XXDP LOAD IN MODE). 


Lotti in Ae see ae Eurag 8 Poorer ie ALE 


EROR Betas, Th OHNE SYSTEM IS SIZED AGA sPaorgcTeD WrTWOUT CAUSING A 
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621 IF ANY OF THE CES IS LOCATED AT NON-ST 

be (SEE BELOW) ey Bevick oneGISTER ADBRESS TABLES (IN Sa 
TAGS") SHOULD BE CHANGED T CORRECT ADDRESSES. FOLLOWING 

ped 15 THE DEFAUL AULT ADDRESS oF THE CONTROL AND STATUS REGISTER OF 

H DEVICE: 

625 

627 RPO3----176714 

628 RKOS----1774 

£23 RPO4----176 

30 RSO3/4=-172040 

632 IF THE AN AN THE BRANCH 

633 TASTRUICTY ON Bos IN THE 8 re ROUTINES Mis Fae REPLACED BY 

634 A NOP (240) FOR BOTH DEVICES TO BE USED. THIS BRANCH IS 

b35 APPROXIMATELY AT ADDRESS 4552. 

637 8.0 MISCELLANEOUS 

He oer e@2ow 

640 8.1 EXECUTION TIME 





641 weccennnnnnnnn 





642 
ea SYSTEM. FOLLOWING ARE ThO TYPICAL RUN TIRES: | 


1. pr heel gh BASIC LINE-32K MEMORY,UBE, MBT, AND NO 
2. SYSTEN- 120 Kc PEMOR, 2 RKOS’S, RPOY, AND 2 RSO4’S 
8.2 STACK POINTER 


THE STACK POINTER IS SET TO 700. 
NOTE ‘ 


WHEN THE PROGRAM IS RUNNING IN EITHER 
USER OR ISOR _ MODE THE 


MI STACK POINTER IS SET 10 

700 THE KERNEL STACK POINTER IS SET 
TO 1200. THE KERNEL STACK POINTER IS 
USED ONLY FOR ERROR INTERRUPT 
SERVICE ROUTINES. ROUTINES. 

8.3 PASS COUNT 






RS Sa As Sa ake EE 


Lp ba HORDS Ue FOR EFFECTIVE Pear nee LOCATION 
SUBPASS _ CONTAINS THE Ascil 
REPRECENTATION. OF Te SUBPASS COUNT. THIS IS USED TO INDEX 


non 
-3 





872 THE PSW TABLE AND MARGIN TASLE (SEE SECTION 8.7). 
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SIX SUBPASSES ARE EXECUTED FOR EACH PASS. THIS ALLOWS ALL 
pig DF AND PSW COMBINATIONS TO BE TESTED BEFORE REPORTING END 





Satotat 







aT a OF THE  SUBPAS NUMBER (THAT IS BEING 
STARTED) S He BY “THE QUICK BROWN FOX J OVER 

23456789". IF RUNNING ON ACT11 QV OR AA 
eT 1s TYPED. AT THe ENO OF EACH pass 


a 
THE ELAPSED fun N Tie “END PASS X TOTAL ERRORS 
oINC REPORT To TYPED. 


8.4 ITERATIONS 








SUB-TEST ITERATIONS ARE NOT PERFORMED UNTIL THE PASS COUNT 
- 8 TS NON-ZERO. THIS MAKES A QV PASS AS SHORT AS 


AFTER THE FIRST PASS, FULL 10 OCTAL ITERATIONS ARE PERFORMED 
ON EACH SUBTEST. 
8.5 T-BIT TRAPPING 


T BIT TRAPPING IS CONTROLLED SY THE PSW TABLE. THE ary 
— IS TO RUN WITH THE T-BIT ON DURING SUBPASSES 2, 


8.6 ACT-11 COMPATABILITY 


THE PROGRAM IS FULLY ACT-11 COMPATABLE. 
8.7 PSW AND MARGIN TABLES 


SEIRREERSE SOIR LOR Sas IRR ERE oF 





710 

7g AT THE END OF ° BEFORE THE SS gl ARE THE 
Ht Sag Ar eon ele era 
ae Sere USED BY THe aecr io TION 9.5. pp sceAd _ FOS BBESERIT LION oF OF Woe 
i Se 

7 8.8 1/0 DEVICE ADDRESS MODIFICATION 
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BITIS 
BITI4 
BIT13=1/0 
BITIP 
BIT 
T10=1/0 
B1103=1/0 
Bt =10 
BITSO6-00 
SECTION 0 
SECTION 1 
| SECTION 2 
| SECTION 3 
SECTION 4 
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IF A POWER FAIL OCCURS (FOLLOWED BY A 
“POWER” IS TYPED ON THE TERMINAL AND THE PROGRAM RESTARTS. 


PROGRAM DESCRIPTION 


THE PROGRAM 
RELOCATABLE 
LONG. 


THE PROGRAM IS “TYE THE eter ite 


LSE hls wl es 
FesBa wad btn he Cele oF oo GE 
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POWER UP), THE WORD 


tS DIVIDED INTO 9 SECTIONS OF POS 
ST CODE. EACH SECTION I 


PUILL Be USED FOR 


NOT USED 
NOT USED 
FPP AVAILABLE/NOT AVAILABLE 
NOT USED 


T 
NBT AVAILABLE/NOT wet a 
KWil-L_AVAILABLE/NOT AVAILABLE 


NS 
NOT USED 


FOLLOWING IS A BRIEF DESCRIPTION OF EACH SECTION: 


THIS SECTION CAUSES A 256 WORD 3 = 8 TEST 
PATTERN TO BE RELOCATED THROUGHOUT MEMORY O - 28K. 


NOTE: THIS NOT BE CONSTRUED TO BE A 
COMPLETE MEMORY TEST. 


THIS SECTION TESTS THE UNARY INSTRUCTION SET 
EXECUTING EACH UNARY INSTRUCTION IN EACH ADDRESS 
ee {ORL ING UNARY INSTRUCTIONS USING ADDRESS 


THIS SECTION TESTS THE UNARY INSTRUCTIONS USING 
ADDRESS MODE 7 AND BINARIES IN ALL ADDRESS MODES 
(EXCLUDING BINARY BYTE OPS USING ADDRESS MODE 7). 


Lu B SECTION TESTS BINARY BYTE OPS USING ADDRESS 


SR AND PROGRAM TRAP (IOT, TRAP, AND 
fo INS tron 

THIS SECTION CHECKS THAT EAC EACH BIT. IN TH THE 5 Papcesaes 
PHCTHUCTIONG, ANB“ODD BOORESS TRAPS; 
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786 SECTION S THIS SECTION CHECKS THE SXT, XOR, SOB, MARK, RTT 
787 AND RTT INSTRUCTIONS. 


ne me eee re 
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SECTION & THIS SECTION CHECKS THE ASH, ASHC 
INSTRUCTIONS AND THE PROGRAM INTERAUPT. REQUEST 


SECTION 7 THIS SECTION CHECKS THE STACK LIMIT REGISTER 
MEMORY MANAGEMENT ABORT LOGIC, THE MEMORY 
rite. REGISTERS, AND THE MAPING BOX 


SECTION 8 nas SECTION CHECKS THE FLOATING POINT OPTION, 
(FP11-B OR FP11-C) IF AVAILABLE... 


FOLLOWING SECTION 8 ARE TWO ROUTINES TO CHECK THE TELETYPE 
PRINTER LOGIC AND A ROUTINE TO START THE KWil-L CLOCK. IF THE 
KW1l-L IS AVAILABLE THE PRIORITY ARBITRATION LOGIC IS TESTED. 


MICRO-BREAK TEST 


THE MICRO-BREAK TEST IS USED TO TEST THE MICRO BREAK 
COMPARATORS AND THE STOP ON MICRO MATCH FUNCTION OF T 
MAINTENANCE CARD. TO RUN THIS TEST THE OPERATOR MUST HAVE 
MAINT CARD INSTALLED AND START PROGRAM AT ADDRESS 


THE PROGRAM ASKS ie roe Hee 
MATCH SWITCH. Checks  GERTREN BIT BET PATTERNS ». 
eT Ye “REGISTER 10 to ENs 


CHeHTee THe OPERA ATOR, TEM TG E, AAO. THe PR OereeGR 
WITH 2 yd a ae AND 200 CAPPEARING: IN RHE Lichte THE 
PROGRAM’ TPES Ig 2th IT IS FINISHED. 


UNIBUS EXERCISER(UBE) 


Oe ae ee ee Om we ee OE SY oe OS oD ee 


ANY OF 4 UBE’S WILL BE USED. THE PROGRAM LOOKS FOR A UBE 
AT ADDRESSES 17770004, 17770024, 17770034, AND 17770044. 


TEST 75 WILL NITIATE ate UNIBUS EXERC SER IF IT IS PRESENT 
THIS IS ONLY SINCE FROM THAT POINT 
ON, THE SERVICE ROUTINE TAKES CARE she STARTING IT. 


THE UBE 3 ITIALLY SET UP WITH A ADDRESS OF 0. THE 
FUNCTION THAT IS LOADED IS “DATA IN BAUSE-DATA OUT BYTE”. M3 
wea rg IS SET FOR 4K BYTES. IT IS ALSO SET TO INTERRUP 


WHEN AN INTERRUPT OCCURS A CHECK IS MADE TO SEE IF 
CAUSED BY AN ERROR. IF THERE WAS NO ERROR, 776 IS L Deo Ag 

















MAINDEC$11-DEQKC-8 FOP 11/70 CPL EXERCISOR 
DEQKCS.Pil 


is 





MACY 27(732) 


14-OCT-76 10:46 PAGE 28 


THE BUS ADORESS AND THE UBE IS STARTED AGAIN. 
INTER 


UPT 1774 


ON THE 


(7764778) Is LOADED AS THE GUS ACORESS. 





NEXT 
THIS 











We meme FOP 11/70 CPU EXERCISOR 





SST DEL ITT 


3.3 


9.4 
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SEQUENCE CONTINUES UNTIL A MEMORY TIMEOUT ERROR OCCURS. 


Bt eet cl fe he pe ieee WAS CAUSED 
MEMORY THe Revesos IN TE Ue BS 


‘at ADDRESS IN THE SYSTEM 

Size Size REGISTERS. ie (NO HOLES IN MEMORY) THE 
35 = AND THE ABOVE € Is 

BEE EAT — THe ADDRESSES ARE NOT THE SAME A MEMORY-HOLE 


ERROR IS REPORTED. 
IF THE ERROR WAS NOT DUE TO A TIMEOUT A UBE ERROR IS REPORTED. 
MASS BUS TESTER(MBT) 





NY ONE OF 4 NBT WILL BE THE PROGRAM LOOKS FOR AN MBT 
aN MBT I Rive TYPE 00, | sree ee 1S RRECKED 
NEKE SURES TAT REALLY IS AN oF} 


TEST 75 ALSO INITIATES THE MASS BUS TESTER. AGAIN, THIS IS 
ONLY ON PASS 1 - SUBPASS 1 SINCE THE SERVICE ROUTINE 


KEEPS ING. 
THE BUS Roe BRO A READ FURC IS JU TIALLY SET TO 0, THE WORD COUNT 
TO 2K WORDS S INITIATED. 


AN T S at 5 THIS ERROR 
GECK Ts IS THE SAE se Trar DESCRISED FOR F THERE WAS 
AND ne Fine uscTan IS 


IssieD Te THe IBD ADDR ROORESS REGISTER 15 NOT CHANGED 


LINE CLOCK INITIALIZATION 


ST 75 THE L. TWO LOCATIONS IN “COMMON 
THE a eal ; LOW ep MOF LOCATION. “LTicKseTs 
, git IATS TG GOCDECIMAL) ITS CLEARED 
I (SEC THE SECOND 

COUNT TO GOC(DECIMAL) LOCATION “MTICKS™ IS INCREMENTED AND 
CHICKS 15 CLEARED. THIS GIVES THe TIMER A GHK DECIMAL RINUTE 


NOTE 


FOR THE UBE , MBT, AND LINE CLOCK, WHEN 
AN IN t XECUTION 
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ons WHERE THEY WERE AND THE PREVIOUS 
PROCESSOR MODE IS RESTORED. 


ee & ote ecesaes-= 
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DE 
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& 
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Se oeie 


OODOO00O0ONDOUOW 
bb +0 0 + 6 = 6-2-2 8 Hp oH 
MONIMU £iItuH-O 
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RELOCATION ALGORITHM 


SECTION RELOCATION 


AS EACH SECTION IS ere "ee VIRTUAL START ADDRESS IS SAVED 
“ el ohn ULATED tO SAVED FACTOR (BYTE OFFSET 
TORO) CALCULA IN LOCATION 


SEACTOR", THe S THEN EXE 
LIS PR tite EN, cM, Meg 2 
Sym ah Ua SEs, atte 


COUNT 9. OK) Sich REL Ssect ON "i USING. A OISKe 
EACH SECTION IS INITIALLY RELOCATED TO THE END ADORESS OF THE 
TIONS START AT T OF 

PREVIOUS | F : IF SECTION O IS I 
T AT THE af a 1005 rie 
alge pene Mee CNT. 2BKCHAS BEEN 
TI ON GOES TO” START OF THE NEXT 

SERED ano t Th pate sy W SECTION. 


EACH SECTION IS WRITTEN IN POSITION INDEPENDENT CODE SO THAT 
IT CAN fe RELOCATED AND EXECUTED WITHOUT THE USE OF MEMORY 


PROGRAM RELOCATION 


CER Se GS Pee 


IN Locat ton" “NEXPAR™. rays VALUE IS mii 


170 
Ae Be LTA UM Nis ye Behe 
EXECUTION IS TRANSFERED TO THE START OF THE PROGRAM A Tne 
RELOCATED POSITION. 


EACH SECTION IS EXECUTED ONLY ONCE aH MEMORY MANAGEMENT 


STIS "io Hae" on ee iad cles Nees 
So ass FOE RET IT Wes 'ne 
THIS rite 88 UNTIL THE 


SU NER hen SEHR SR I AS Ve 








ee ne ne ne tee ne ee ee Se en ee ere ae ae 
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360 
961 


THE VALUE FOR THE PSW AND MAINTENANCE REGISTERS IS TAKEN FROM 


-_—— Re ee tre eee = ee eee oer ee ee ee ee a ere noua en eeeee 


cen ee rg 
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DEQK 
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BERG RRO Boe CRC O Nes Jal otal Sandee cee = § 





9.5.4 





= 
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Setanek 


Beat Pa B28 hs Fan hn fh 0 De Be fo he ht hs bo Qe 





Oo000000O 


0 
NOU SWwe-O 
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USED p He Obtarned gy Thos Nef THe TABLE BY THE cue et abe xt NUMBER 


XAMPLE, SUB Fass 3 Uses. acho 3 (THE 
FPRsT WORD i COUNTED aS. ZERO) OF EACH TABLE. ORE, 10 
C THE VALUE IN THE PSW OR RAINTENANCE REG "EG GISTER’ ONLY 
REQUIRES CHANGING VALUE IN THE APPROPRIATE 


DE SO AE RLU HAR, 


RELOCATION VIA CP 

IF SW<8> 3 SET, BOTH SECTION AND PROGRAM RELOCATION ( 
SECTIONS 9.5.1 AND 9.5.2), ARE PERFORMED BY AN INSTRUCTION 
MOVE LOOP RATHER THAN A DISK: FOR EXAMPLE: 


1S: MOV (RO)+, (Re)+ 


ge ee RO,R3 
CODE ce ING 
abbrese Haat f1 Ye BeINe nOVED Yo, AND fa 19'7Re LAér Alondts 
THAT IS TO BE MOVED 
as IS FINISHED, THE RELOCATED DATA IS CHECKED BY AN 
COMPARE LOOP TO ENSURE THAT THE RELOCATION WAS 


INSTRUCT CORRECTLY. 
mpgs VIA 1/0 
F Su«B), 15 NOT SET, BOTH SECTION AND SEE 


SECTION 9.51 0 8 Sach ie hf Na 


RELOCATION IS CONTROLLED B 


9.5.4.1 SECTION RELOCATION 


WHEN THE I/O MONITOR IS ENTERED FROM THE pret DCAT ION ROUTINE” 
(SEE SECTION 9.5.1) A DEVICE IS SELECTED (SEE 9.5.4.3) 
Mike Renee 


THE 
ie Tete Mga TP SPAN ache ate 
RELeateD’ BATA WITH AN Te INSTRUCTION COMPARE Coop 70. THE 
tes Perrale Vome RETURNS TO THE “RELOCATION 


an 


9.5.4.2 PROGRAM RELOCATION 


N THE 170 oe TS ENTERED FOR PROGRAM RELOCATION (SEE 
Sees it on THe wa ; Pte Melis ‘i 


IF SW<8> IS SET, 





[tee 
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1018 RELOCATION IS PERFORMED VIA THE Cr (SEE SECTION 9.5.3). 






AR 





ee ee ee an eee Se ee ee re ar ae ee a on ee ee 









sas A eg a 
= aJ8c8 Sea z me _- wos oe ine 
rete a: eo # ie SrEe ate Aeon Be 
mad rtrd ride — sion : wn Pav eae BS 
“ es - Ease gs ott: ee : ae: ae 
Tn Se et cl Be PSs 
~ vege woe ss + ees ee = < ad cL 
6 IS cit <3 OF Bouine S40 Pubs 2 pee 2 “FS is 
8 a Sneges 2 Yung osuee § SS, ey 
z sa aw wn a hs ae Bee =: Sat S 4 
2 oo ee  Testull #55 . 7ea8; Bee ern tte 
ge ee ee ee 
- tg ms Spozuw weet fo = et4 | BL Ages Sus 
eS fig Be $8: 
= “st vbie“ pitece gS v oss Sue oS - ss 
5 WOESSS 5 MonSgta. whe Geel “oe oe ogo be 
g «- BYSeHeag F BERSE Be Rage BeBe bret @ Et ait 25 
i a8 ot" a a fis ito x oS BENE, SESGo S we g we Sez 
oe ee on ae 3 Bee © be BER fen 
mg 7. UO BRN WRKor HH =. 9 mo 3 ae 
; Resogvevel © Sees oeey SEE tee : w 83 $2 
- ui 
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FANOLER STATUS WORDS AND DEVICE HANDLER 


T NUMBER” TAL 
UNIT NUMBER 
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ARE LOCATED IN THE “COMMON TAGS” AREA OF THE LISTING. 


cer ey he ete eo : RANDOM Ronen (su ; | of fe Se7 {0 18 


CE ID 
eile Cee ey eri vase pay 
IDENTIE! By WORD THE SECOND 2K BY WORD aie Blt 


CONFIGURATION OF EACH WORD IN THE RUN TABLE Fs fs” AS FOLL 
15:13) z DEVIUE 1D 
d :10> = UNIT NUMBER 
<9> = NOT USED 
(8:0) = CYLINDER ADDRESS 


crn ae oe. OF THE TRANSFER IS SAVED IN THE “RUN 
Teac Maa POSIT TON, IN THIS TABLE IS_AS 
rie REQVE 1 CONFIGURATION OF EACH WORD IS THE 

SANE 


S 

ADDRESS REG aye FOR THE PARTICULAR 

Bev CE. BIT 15 IS 70 INDICATE A ue ERROR: IT IS SET 
HE DEVICE ICE INE. (SEE SECTION 4.5) 


nN inty apes THE DEVICE REGISTERS WITH ALL THE 
ePeRopeTaTe STARTS A WRITE FUNCTION. 
EER aX RETURN M0 THE I70 MONITOR AT THE POINT WHERE 


9.5.4.5 DEVICE SERVICE ROUTINES 


EACH DEVICE THAT IS USED FOR RELOCATION HAS A SERVICE ROUTINE. 
THESE ROUTINES ARE ALL FUNCTIONALLY THE SAME. 


THE ROUTINE IS ENTERED BY A DEVICE INTERRUPT. THE DEVICE IS 


aS. See od far Bac or fed 
CALCULATED Pr dey Ie RONITOR, $0 THE ae rea ctat ae 


oe OTE PMMA AON ike BY. 
UPON INITIATION OF A FUNCTION Re Br ION OF ALL THREE 
TUS re nies Pe TI Bei vo eT 

AN ERROR_IS DETECTED ts eetien THAT FAILED IS RETRIED 


Ue Peet lt 15 erie re maee” Beit 


N THE RUN TRACK 
THELE, he THE TRdotrne The Arh AS DESCRIBED 8 f 











LO3 





MAINDEC-11-DEQKC-B FOP 11/70 CPU EXERCISOR 


DEQKCB.Pil 


@ 

wo x 2 
uy 3 - 
a 5 ny 
r 5 
3 S m 
4 2 - 
2 = z. 
8 i : at 
B e. . = 
, ote © ER 
a BHOb az Yo 
S UBeS 3 ws 
5 we. = Se 
3 eat; 
= oS 

nese € 2 


OOOO ET FF FFs FF URNA RN BoD 


mn Kee Reme Keee Keon Kame Kom Kem Reet Rate Kom Rom Kon Kon Kos Roe Ko Doe roe ke foe cues gis ey eS ee Re ee kee 
oO ed ed eh ad On Od mg md Oh dd ry oh gd OO Og ed eh Od HH Hee 








MO3 


14-OCT-76 10:46 PAGE 39 


MACY11 27{732) 


MAINDEC=11-DEQKC-B8 POP 11/70 CPU EXERCISOR 


DEQKCB.P1l 


ul 
oO z 
Lad o 
> ta 
es a 
es 8 S.. 
w a> S ra} 
= a od & onload 
f 3. Fuze Bie 
; a 2 ZNZRu e3 
Lend — Old 
6 oS KN OO FG 
loo faatntes aes 
SB Bee o SS. and 
wiacw wee it io 
wi Wu) or hate ete Oo 2 —_ 
| SSS Grater Zu 
a amm anonmom 
| SSEeEUSSSSESS HY 
4 J 444 OD J 404 0 -  —- COO 
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ee hee bento on 


SBTTL OPERATIONAL SWITCH SETTINGS 
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.SBTTL BASIC DEFINITIONS 
-#INITIAL ADDRESS OF THE STACK POINTER *** 1200 #% 
STACK= 1200 


Ob + es Bh - 2 g 
SS 








1 ooteoD KERSTK= STACK iP dhen “ounce: THE STACK 
lel 07 - §UPSTK= STACK-300 :: SUPERVISOR STACK 
lell ‘USESTK= STACK-400 He STACK 
leis _ JEQUIV ENT, ERROR BASIC DEFINITION OF ERROR CALL 
tel “EQUIV IOT?SCOPE BASIC DEFINITION OF SCOPE CALL 
lets 177776 PSS ny 177276 *:PROCESSOR STATUS WORD 
iste 177774 STKLMT= 177774 ;;STACK LIMIT REGISTER 
1217 17 PIRG= 177772 ::PROGRAM INTERRUPT REQUEST REGISTER 
ie : SHR abeeoro ::SWITCH REGISTER 
i 
1g2 »#MISCELLANEOUS DEFINITIONS 
ll T= 11 CODE FOR HORIZONTAL TAB 

1288 2 LF= 12 ::CODE LINE FEED 
1 1 CR= 15 :CODE CARRIAGE RETURN 
1 000200 CRLF= 200 CODE FOR CARRIAGE RETURN-LINE FEED 
1 ‘¥GENERAL PURPOSE REGISTER DEFINITIONS 

2 oococo Ro= “0 ;GENERAL REGISTER 
1e69 000001 Riz %1 ::GENERAL REGISTER rt, 
1230 000002 Re= %e ;;GENERAL REGISTER {Ky 
12 oo0003 R3= “3 * GENERAL REGISTER i 
1 04 R4= “4 ;;GENERAL REGISTER “vt 
} 0000 RS= 45 > GENERAL REGISTER 

34 0000 Rb= “6 *?GENERAL REGISTER 
iSse wasn! RZQuIV AO,RIO t ENERAL REGISTER 
12 “EQUIV RI;RIL *:GENERAL REGISTER 
1238 “EQUIV Re. Pie > GENERAL REGISTER 
1239 “EQUIV R3,RI3 *? GENERAL REGIST 
1 -EQUIV R4Y,R1Y 33GE REGIST 
1241 “EQUIV RS;RIS >:GENERAL REGISTER 
1242 “EQUIV Rb6,SP 2: STACK POINTER 
1243 “EQUIV SP‘KSP :?KERNEL STACK POINTER 
1044 “EQUIV SP\SSP SUPERVISOR STACK POINTER 
1245 “EQUIV SP.USP :USER STACK POINTER 
ice -EQUIV R7,PC $8 C 
1248 -¥PRIORITY LEVEL DEFINITI 
1249 Pros sO :PRIORITY LEVEL 0 
1250 PRiz 40 > PRIORITY LEVEL 1 
1524 Maat presi Hcy LEVEL § 
ges ete PR4= By * PRIORITY LEVEL 4 
15ee aah Pree 500 PRIORITY LEVEL & 
126 Baa PR7= 300 + PRIORTT LEVEL 8 
1e58 ix"SHITCH REGISTER” SWITCH DEFINITIONS 
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NITIONS 


Deri 
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BASIC 


TAAAAAA AA 


Boe eee EEE EERE Ee 


>> >>>>>>>> 2 


ioe (BITOO TO BIT1S) 


T9000 


4 


uu 
es 
oe 


naa 


13 


eeeeeee8f 8 e@ 


Soin MS atsttsn taatsta 


OE Ok OO 8 HF 08 4 OF OG OF Od OH 8 OF 4 OH 8 O49 0-9 Od Od ond Od 0 OO OG 


Rane 


De hee} 
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Ree Sane Pepebecies 
a alan 
— eo MU Vos u-OaaoOGGooos 
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easoeauecdodadesaaaass Aare tale ets PEER 
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R IRE. OUT Sano OTHER ERRORS 


SaS88SS8ss8 





“CPU” TRAP VECTOR 
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tfstotetatatatatetst etait 
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: RESERVED AND ILLEGAL INSTRUCTIONS 
ve 

SEBREAKPOINT 1 TRAP (BPT) 
$3 $s INPUT /QUTPUT TRAP (IOT) ##SCOPE** 
S;EMULATOR TRAP (EMT) ##ERROR## 
HITT KeYoOeR vec } VECTOR 

ss TTY 

33 CACHE IN ESEUPT VECTOR 
:3PR INTERRUPT T REQUEST VECTOR 
3;MEMORY MANAGEMENT VECTOR 


-SBTTL CACHE REGISTER DEFINITIONS 


s;LOWER 16 BITS OF ADDRESS THAT CAUSED ERROR 
;;UPPER SIX BI TS OF 1 pouRess THAT CAUSED ERROR 
# eRe * ROL REGISTER 

MAINTENENCE REGISTER 
tuIT MISS REGISTER “1° IMPLIES HIT IN CACHE 


-SBTTL CPU REGISTER DEFINITIONS 


SIZELO = 177760 
SIZEHI = 177762 
SYSTID = 177764 
CPUERR = 177766 


; MEMORY 3 REGISTER NUMBER TO PUT INTO A PAR 
$110, GET Q THE LAST 32 WORDS OF MEMORY 
3 sHIGH SIZE REGISTER, RESERVED FOR FUTURE USE 
;CURRENTLY ALL ZERO’ 
t SYSTEN ID REGISTER 
;CPU ERROR REGISTER me CONDITION THAT CAUSED 
SETHE TRAP TO ERRVEC (000004) 


-SBTTL MEMORY MANAGEMENT DEFINITIONS 


;*#MEMORY MANAGEMENT STATUS REGISTER ADDRESSES 


;#USER “I” PAGE DESCRIPTOR REGISTERS 
UIPORO= 177600 
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be okee. Pil MEMORY MANAGEMENT AE INTTIONS 





SREERES 


RePEEEE 


ae Come Ke Kee kom hot hom | 


See SSS CCW aaa aa A aerial aise 


Sit Rem Rae Death hem Reem Kam Keon Kee Kee Kem Kame Kam Kom Reon har hak Kom Lae hon Ker Kew Roe Laon Rat Law bon how Toe foe te ee ee ee ee) 





“0” PAGE DESCRIPTOR REGISTORS 


"I" PAGE ADDRESS REGISTERS 
;#SUPERVISOR “I” PAGE DESCRIPTOR REGISTERS 


;#USER “D” PAGE ADDRESS REGISTERS 


ee QIIINIIII4 


1409 





RSSRSREE 


ong he 


Bereeers 


00 8 4 8 0 04 
UUMUMUWUIW 


RESRSENS 





;*#SUPERVISOR “D” PAGE DESCRIPTOR REGISTERS 


SbepRl= 17082 
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1449 172ebe 
1450 172264 
1451 172266 
1452 172270 
1453 17227e 
1454 172274 
1455 172276 
1456 

1457 

1458 

1459 172300 
1460 172302 
me ee 
1463 17231 
1464 1723le 
1465 172314 
1456 172316 
1467 

1468 
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1481 172340 
1 17e34e 
1 172344 
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;#SUPERVISOR “D” PAGE ADDRESS REGISTERS 


SDPARO= 172260 
SDPARI= 172262 
SDPAR2= 17ecPe 
penis 176275 
SDPARS= 1 


SDPARS= 17ec74 
SDPAR7= 172276 


;#KERNEL “I” PAGE DESCRIPTOR REGISTERS 





#KERNEL “I” PAGE ADDRESS REGISTERS 
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KDPAR?= 172376 


.SBTTL UNIBUS MAP REGISTER DEFINITIONS 


3 THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED *MAPLXX” 
;#THE UPPER & BITS OF THE MAP REGISTERS ARE LABELED *MAPHXX’ 
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UBREAK=177770 
-SBTTL TRAP CATCHER 


L UNUSED Pe slthed ER Ry Be bore * +2, HALT” 
ESE TO, Tht neh fo" CATCH IMPROPERLY L VECTORS 


-SBTTL STARTING ADDRESS(ES) 
-=200 


2210 JMP OsSTART ;;JUMP TO STARTING ADDRESS OF PROGRAM 


MP TART 
3 ; RELFLELLLELELE LALLA ALLELE LLLELALLLELEELE LAE LLL LAE LLL E ELLE RE LE 
.SBTTL ACT11 HOOKS 
;¥THE FOLLOWING LOCATIONS ARE SETUP TO BE USED WITH ACT11 
a OCATION 46 WILL CONTAIN THE ACORESS OF THE LOCICAL 
+ #END PROGRAM. 
LOCATION S2 IS USED TO SPECIFY PROGRAM OPERATING REQUIREMENTS 
; BAND /OR RESTRICTIONS. THIS IS ACCOMPLISHED BY SETTING VARIOUS BITS 
:4T0 ONE OR A ZERO. THE BITS USED AND THERE MEANING ARE: 


BIT 1S5=1 PROGRAM SHOULD BE POWER FAILED WHILE RUNNING 
=0 NO POWER FAIL DESIRED 


BIT 14=1 PROGRAM RUN TIME IS MEMORY SIZE DEPENDENT 
=0 RUN TIME IS NOT MEMORY SIZE DEPENDENT 


BITS 13-0 MUST BE ZERO’S 


SSVPC=. i3 SAVE L LOCATION COUNTER 

-=46 ; beer LRA TOH COUNTER 

-WORD  SENDAD Won'c TO worees SENDAD 
-=52 t LOCATION OUNTER 
WORD 40000 SET LOC.Se To. 40000 

3; RESTORE LOCATION COUNTER 


WK DEC OC Bic aie oe 20 2c 
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QUIRED : 
<07>=0=YES) 


la a ae 


RN -OouTw 
SORT esees 
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¢ Shue % 
Ye a 
WARARRAS 


8 0 0 0 4 0 


Se ae 
Essen 


REG. 1200 
EYER FOR FILLS 
1200 
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* DATA 


een penn 


200 OF *BAD’ DATA 
GOOD’ DATA 
We ae 
;CONTAINS NULL 
CONTAINS x OF F 


8 

) 
Efed Sittoy*ansind = 
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Hin PRI 
CON PRI 


5p RRRARERLAAELERAEAALAARE AAA RERAAARARALAL ALARA LALA LAA RAELALLLELELE 


;*®THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
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+i ;CARRIAGE RETURN 
FEED 


+3 
‘vehi FOR FLOATING POINT CONVERSION 


sEXTENDED EXPONENT VALUES 
sFOR THE 1X FLOATING POINT 
; ACCUMULA’ ORS 


;FLOATING POINT DBL PREC BUFFER 
;POINTER FOR KEYBOARD BUFFER 


ING yeeDUT FLAG. CINMIBIT KHEN SETD 
‘Sete Fon Tet? TRep 


;BUFFER FOR VIRTUAL “AD ADDRESS 


sBUrEER FOR OrESs BITS ert a BITS<15:00> 


;NO EXECUTE EXECUT ION WHEN sgt) 


iy Pusecay rae \ hago: se 
O RYYSN entT AA PrsG WHEN SET) 
ee Oca FAC (NUMBER OF 


ION BEING EXECUTED 


Bee AST FREE MENORYCIN 28K) 


;NEXT PUT IN PARO 
{LOM 16 
ihIGH 16 BITS. OF RANDOM 


4 


O ;BUFFER FOR PRINTER TEST 


BA. 
EU IBEUEE 08 OES OTE 


DEST ADDRESS FOR DEVICE REL 
Two's COMPLIMENT WORD COUNT "FoR Device TReLoC 


DEV UNE ireeR (0 TO 7) 
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1807 901600 MTICKS: .WORD ;ELAPSED RUN TIME IN MINUTES 
i 51 LTICKS: .WORD iLOW BYTESNUMBER OF CLOCK INTERRUP TS (OT 053) 
1E18 Meee ee 10 ew M SIZE T ralhrERic F ) 
1818 BURT : .BLKW : RO Tine Feeuecofe en “ENTRY FOR 6 PACH 2 BLOEK) 
1814 RAPT “HORD «cl «© TRAP TABLECONE BYTE FOR EACH UNTEUS Devices” 
tH 5 “HRD -1 * UNUSED= pes fiseDetoue Fac be abe rated 5 
igie UBESAV: .BLKW : BASE RESS OF ER IN PROGRESS 
1817 UBEADR: -BLKH ; ADORE GET D INTO UBE BA RE 
1818 ERRBA: .BLKW *18 BI UNTBUS Eee WHEN DEVICE DETECTED AN ERROR 
1819 -SBTTL DEVICE HANDLER STATUS WORDS 
1820 % EACH WORD THE FOLLOWING BIT ASSIGNMENTS: 
1821 3% 7 READY 
1822 % 8 REPEAT LAST FUNCTION 
1823 * i 1S ERROR 
1824 001676 RPSHSTAT: .WORD 200 sRPO3 
1825 001 000200 RKHSTAT:.WORD 200 *RKOS 
1826 001702 00200 SPAREO: .WORD 200 
1827 901704 SPARE1: .WORD 
1828 00170 000200 TAT: .WORD 200 ;RPOY 
1829 00171 oo0200 RSHSTAT: . WORD 200 *RSOY 
1830 001712 “WORD : SPARE 
1831 001714 o00200 .WORD 200 : SPARE 
1833 .SBTTL DEV TS 
1834 3% This Teeke Get ORO ES By rT THE 1/0 
1835 + RELOCATION Se PINe WITH THE TWO’S COMPLIMENT WORD 
1836 + COUNT FOR THE T NSFER FOR THE PARTICULAR DEVICE. 
1837 001716 000000 RPSHWC: . WORD RP 

us RKHWC » s 
1839 001 Goo000 “HOD nee 
1840 O01 WORD : SPARE 
1841 001726 O00000 RPYHWC: . WORD :RPOY 
a 001730 000000 RSHWC: .WORD >RSO4 
1844 .SBTTL DEVICE HANDLER OLD BASE ADDRESS 
1845 : THIS TABLE GETS LOADED BY THE 1/0 RELOCATION ROUTINE 
164 2% WITH ADDRESS OF THE SOURCE DATA FOR THE 
184 i DEVICE THAT IS GOING TO TRANSFER THE DATA 
1848 001732 RP30LD: -HORD :RPOS 
1849 001 : 
1850 001 RKOLD: . ;RKOS 
1851 1 ’ 
1 1 . ; SPARE 
1853 001744 WORD : SPARE 
1854 O01 “WORD 
1 001 “WORD ; SPARE 
1 001 RPYOLD: :WORD *RPOY 
i 01764 ; “WORD 

. . s 

1653 BB 7E8 RSOLD: WORD RSOM 
1861 SBTTL DEVICE HANDLER NEW BASE ADDRESSES 
1862 % THIS TABLE GETS LOADED BY THE 170 RELOCATION ROUTINE 
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RCISOR MACYL1 27(732) 
ASE ADDRESSES 
3% WITH THE BASE ADDRESS OF THE DESTINATION FOR T 
% HAY ucaR REVEC FRAT 1s at 15 DO THe RANSFER. 
RP3NWL: .WORD sRPO3 
RP3NWH: - WORD 
RKNEWL: . Ko sRKOS 
RKNEWH: .WOR 
“WORD ; SPARE 
“WORD 
-HORD ; SPARE 
RP4NUL : ;RPO4 
RPYNWH: .WORD 
RSNEWL: .WORD sRSO4 
RSNEWH: .WORD 
.SBTTL DEVICE HANDLER UNIT NUMBER 
: THIS TABLE GETS LOADED BY THE 1/0 RELOCATION ROUTINE. 
: IT S THE DEVICE HANDLER WHICH UNIT NUMBER IS 
+ % TO DO THE TRANSFER. 
RPSUNIT: . WORD ;RPO3 
RKUNIT: .WORD *RKOS 
WORD > SPARE 
- WORD ; SPARE 
RPYUNIT: . WORD >RPO4 
RSUNIT: .WORD *RSOY 
.SBTTL ADDRESS OF THE DEVICE HANDLERS 
3% THIS TABLE CONTAINS THE ADDRESS OF THE DEVICE HANDLER 
= i ROUTINES. I 1S USED BY THE 1/0 RELOCATION ROUTINE 
ty TO TRANSFER CONTROL TO THE DEVICE HANDLER. 
RPSHANA:.WORD RPSORV ; 
RKHANA: .WORD RKDRV ;RKOS 
- WORD ; SPARE 
- WORD : SPARE 
RPYHANA:.WORD RPYDRV ;RPO4 
RSHANA: .WORD RSDRV ;RSO4 
.SBTTL DEVICE HANDLER DISK ADDRESS TABLE 
+ % THIS TABLE GETS LOADED BY THE DEVICE HANDLER WITH THE 
+" DISK ADDRESS(SECTOR AND CYLINDER) OF THE CURRENT 
* i TRANSFER. ° 
RPSHDA: .WORD RPO3 DISK ADDRESS 
RP3HDC: .WORD *RPOS DESIRED CYLINDER 
; WORD *RKOS DISK ADDRESS 
“ - WORD ; SPARE 
Sa “WORD sRPOY DESIRED CYLINDER 
RSHDA: .WORD *RSO4 DISK ADDRESS 


.SBTTL DEVICE HANDLER FUNCTION T 
3% HIS FaaLe GETS LOADED BY THE DEVICE HANDLERS 


RKFUN: 


WORD 
WORD 


AND THE DEVICE SERVICE ROUTINES. IT TELLS THE ROUTINES 
1S cms, att FUNCTION TO DO NEXT. 


tRKOS 
; SPARE 
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DEQKCB.P1l DEVICE HANDLER FUNCTION TABLE 


[ve] 
~~ 
vs) 


foeor0 600000 


to 
w 


=-l= 
=l= 
wr 


+t 


1 

i 

i 

' 

i 

1926 

1927 

1928 002072 000 
1929 002073 

1930 002074 000 
1931 002075 000 
1932 002076 000 
1933 002100 
1934 

1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 002100 176710 
1944 0021 176712 
ae Bie bee 
1947 002110 176720 
1948 O0¢l 176724 
ies Bt aes 
ieee bbe 000255 
1 

1953 

1954 0021 177400 
1955 O0ele4 177402 
1956 002126 177404 
1957 pest 177406 
1958 1 

19539 0021 177412 
1960 002136 000220 
1962 002140 O000eee 
1 

1964 

13e6 

1 

196 

igs 

is 

197 

1 

1 

1974 


FENoeenotey SeENBRLR BorenoR2ns 
3 
ao 


et bao fan bon pine hee fae ban Bae fe ee 


Riri 


RPYFUN: .WOR sRP 4 
RSFUN: .WOR RSO4 
.SBTTL DEVICE HANDLER RETRY COUNT 
:% E GETS LOADED BY THE DEVICE HANDLERS ft IS USED 
2 x wt Fue nate £ SERVICE UTINES. IF AN ERROR CCURS 
x THE DEVICE SERVICE ROUTINE WILL RETRY THE BUNey ION UNTIL 
ii HE BYTE IN THIS TABLE GOES TO ZERO. ‘HT IS INITIALIZED 
RPSTRY: hie RPO3 
RKTRY: .BYTE *RKOS 

BYT : SPARE 
RPYTRY: .BYT ?RPOY 
RSTRY: -BYTE *RSO4 


-SBTTL DEVICE REGISTER TABLES 

; THE FOLLOWING TABLES CONTAIN THE STANDARD ADDRESS FOR 

; ie DEVICES USED BY THIS PROGRAM. IF A DEVICE IS PLACED 
T A NON-STANDARD ADDRESS THE APPROPRIATE TABLE CAN BE ~ 

CHANGED AND THE PROGRAM WILL OPERATE THAT DEVICE. 


i EXCEPTION--SEE DOCUMENTATION FOR RPO3 AND RPO4Y PROBLEMS. 
"SBTTL RPII/RPOS REGISTERS 

RP3DS: .WORD 176710 ;DRIVE STATUS 

RP3ER: <WORD 176712 :ERROR REGISTER 

RP3CS: -:WORD 176714 ;CONTROL AND STATUS 

RP3WC: :WORD 176716 WORD COUNT 

RP3BA: :WORD 176720 ; 
RPSDA: | <HORD 176724 j 
RP30C: 176762; 


co Se 


-SBTTL RK11/RKOS REGISTERS, 
RKDS:  .WORD 


ISK ADDRES 
;DESIRED CYLINDER 
;INTERRUPT VECTOR 
;INTERRUPT VECTOR+2 


: 177400 DRIVE Be ats 
RKER: .WORD 177402 ERR STER 
RKCS: . WORD 177404 CONTROL ANG STATUS 

: WORD 1774 ;WORD COUNT 
RKBA: WORD 177410 ;BUS ADDRESS 
RKDA: .WORD 177412 ;DISK ADDRESS 
RKVEC: .WORD goo ; INTERRUPT VECTOR 

° ;INTERRUPT VECTOR+2 


: 
: 
: 
i 


; CONTROL a STATUS #1 
ORD 


* BUS te 

sBUS AODRES RODRESS EXTENDED 
9 

> CONT ROL a TATUS # 
SCONTROL . STATUE s 


a 


Stalstatatottatotate® 
£ 


3 
ie 
Ba83888 


pon fe of soer 
;ERROR REG #2 
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ue ey res 


; INTERRUPT VECTOR+2 
“eos AND STATUS #1 
COUNT 


SK ADORE 
iia te AND STATUS #2 
3 CON a STATUS #3 
;DRIVE ae 


Mpa! VECTOR+2 
Cette Eee pe 
2 


: 


i "s 


: WORD 3C 
- WORD ;BUS 
or rod sCONTROL REGIS 
“ CRI ; GISTER #1 
WORD re : ADDRESS 
. WORD C 3i VECTOR 
-WORD UBEVEC+2 s INTERRUPT VECTOR +2 


MASS G : 
Te PROGR RSSErBLED a S FOR A MBT 
BY 770100._1F THE FGT IS AT ANOTHER ADORESS THE PRoGRAN 


J oe ae 


; STER se 
;MASS BUS TESTER #3 
;MASS BUS TESTER #4 


sae 
Be 
a 
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ESIC TIS Lic Lili tc teriiiriiiiiiititiittirtiiititittitttiititttiite) 
-S8TTL ERROR POINTER TABLE 

satus TABLE corrars THE INFORMATION ‘* EACH ERROR THAT CAN OCCUR. 
#7 ION HE 


; NF ORMAT OBTAINED BY USING NDEX i FOUND IN 
HELOGatTON SITEMB. THIS NUMBER Inolcntes bac ITEM IN THE TABLE IS PERTINENT. 


i 





2035 : IF SITEMB IS ONLY PERTINENT DATA IS (SERRPC). 
e038 eNOTES: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
2038 3% EM ;;POINTS TO THE ERROR MESSAGE 
2039 +k DH *:POINTS TO THE DATA HEADER 
Ba % T *:POINTS TO THE DATA 
1 3% OF 3;;POINTS TO THE DATA FORMAT 
Ete 002304 SERRTB: 7 
24S -ITEM 1 
002304 o5u772 EM ;UNEXPECTED TRAP TO 4 
1 DH :PCOFTP PHYSC PSW CPUERR 
10 Tl ;VAOR, VADR, STMPO, STMP2 
12 055056 OF1 :0,1,0,0,0 
a 14 055076 piven e CTED TRAP TO 10 
Sae5 bose besies a ‘BOpE TP Baysee PSW 
2053 152 OTe ; VADR, VADR, STMPO 
— = os OFTEN 3 
2056 002324 055162 em3 sUNEXPECTED TRAP TO 2SO(MGNT) 
chee pressh peesee BS VER VAOR STHPO; .STRP2, SITES 
2059 OS50S6 DF 1 De a Ss ty “3 
2060 ITEM 4 
1 os530e EMY ;UNEXPECTED TRAP TO 114 
cube 1 DHY sPCOFTP PHYSPC PSW  ERADREG MEMERRREG 
doe349 DT3 ; VADR , STMPO, STMP3, STMPe 
ooee OFTEN 5 :0,1,0,2,0 | 
ebb pea 055414 EMS sPARITY ERROR DURING DATA CHECK. ool 
2068 002350 ae pre H ,PA1SOO, STMP3, STMP2 
2063 O0e3S2 055520 DFS 
2070 - ITEM 6 
sire 3 O555% sERROR DURING CHECK OF RELOCATED DATA 
055626 O76 : STMPO, PALSOO 
| a veabes OFTEN 7 — 
50000 
ging Oieare 000000 
ITEM 10 
| 2081 055634 aut sERROR DURING DATA CHECK-RELOC WAS BY 1/0 
08 055705 10 : DST DEVICE THAT DID XFER 
055760 OT10 : STMPO, VADR, STMP2, STMPS 
| 
i 


Se ene -- 


10:46 PAGE SE 


DOS 
14-0CT-76 


MACY11 27(732) 


EXERCISOR 


POINTER TABLE 


-B8 P 
E 


-DEQKC 


C-11 
Pll 


MAI 
DEQK 





3 Y 
Bee wee | re i 
Ra gS Bi 
ZS. tI ath Ss - a 
a4 o ue za 4 gy 
Sa eS re so g & 8 
oe ee ee 
os — | 8 z, 8 4 
Obi Bieuuruubimmeuculis 3 33 bin 72.0.0 


MIGOS SOS aIGOS -aiSOS sO SOS 


G ed dad gad food feed ade 
& HESS Haas Hes ae GRRE EE 
SSSSS4SS8SS=UN2% 


Od Od 8 ond 4 Od 8 4 0-4 wm 4 4 04 4 
cqucurucuns 





002462 


“+ 
1 











mn me ee es a ee we ee 


Ce nr ee ee se 


EOS 
NAINOEC=11-DEGKC-B POP J1/70 CPU EXERCISOR —ACYLL 27(732) IN-OCT=76 10:46 PAGE §7 


ahd 
bm 
is 
w 


ooeyey 013737 177570 177570 STARTI: MV ; DESUR aeSwR 
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-SBTTL _M 

3% 18 TEST IS STARTING THE PROGRAM AT ADDRESS 214. 
;*#THIS TEST REQUIRES A NA Wee AND OPERATOR INTERVENTION. 
;#THE PROCESSOR SHOULD ST TIMES. FOLLOWING IS THE DATA 

;#THAT SHOULD BE_IN THE MICRO-ADRESS DATA LIGHTS EACH TIME: 
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_ J eee PE: : 
Rote Gt rte e Te atses Toleg 
2 spSotsalssnacansenslessessages fst, 3g 
& 3 8 as saa 
s Fe Ef 
oH Sar R @ RB - 8 geae 2 
< pak E g Regus be 5 aces RRS 


oR a RR 
OH 8 Ong 9 Od Od On omg Od Od OG Omg OE Od Od Od OG Od w=4 OH OG 


UCU CU CUTUCUCUCUCUTUuCUCUCUCuCUTU 


10,5010,5020,5040,0,5200,207,5010 


START 


BYTE 0,1,2,4,10,20,40,200, 100 


UBRTBL: 
INSTBL 


| ees pee Be 


SSLANG RAST BARZGRZ & 


Ktetetetet=§ edeteteteG tedetetete= Gg ot 


= 
S8S3 Sse sass a 


O-UMTiNwN 
a bobabalebetabe 


RUNNY 









ee nae 
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paste ot 12737 076543 001524 ——- Roy ? 7osig SESH ons KERN TRITIACIZE RANDON NUM GEN 
ie Gress abies HOV S4SaMeB gage 
s DETERMINE HOU WAS LOADED AND WHAT MODE (IF ACT11) 
SET MEMORY TECTION. 
: aay ; SET NOT NOT QV_NOR AA MODE 
XXDP: OTe *XXDP Nica 


0 OR 
XXDPC: .BYTE 0 CHAIN NDICATOR 
éLR (PC)+ SEAR MEMORY PRO ECTION LIMIT 


036754 agp i B eSENDADSY SL COUR Mor ev ro 


l 
001504 pve sP,a0av ;SET ACT11 QV. MODE 


001504 


- 


;SET ACT11 AA MODE 


oooo42 2s: IST [ ;BRANCH IF NOT IN CHAIN MODE 
003241 MOVE aexxorc sSET CHAIN MODE INDICATOR 
T PROTECTION LIMITS 
001504 iget renoey Prove SMANCH IF QV OR AA 
003240 65 By BRANCH IF NOT VIA XXDP 
Q MEMSIZ ; 
MOV @PROT ae MONITOR 

1516 MENSIZ: ROY 81 Jel STNEN ; oANTO LSTHEN 

151 SUB @ePROT. 2 : 
056370 001514 MOV —s- SENDTad+2, :SET PrOTE CRELOCATION ADDRESS 


BE ozoa sc ates gu 


ae" grea aar. 


LOWER S 


a SS GA 
dn 





» SaMXMMHI ;SAVE UPPER SIX BITS 
R3, d8MXMMLO sSAVE LOWER 16 BITS 


SKERSTK, SP ;SET STACK PTR 


‘ce 


a 

goes ganerge 
nes 
3; 


ANNE Be 





003410 aeSPASS :CLEAR PASS COUNT 
Ba Kee i ecom =a Paha WEE 
003426 TST SePROT ‘ 
Se * 9 81600, aaNEXPAR 

012700 MOV «#27, RO sSET $08 COUNT 
nO RHE 2s: ct Reels saEERR TABLE ABLES 
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DEQKCS.P1l I 


SUES § 
BS Ee EEW E 


. + — 
4 + x 
4 A 
A 
Se 
s 


1240 
200 


- 
coos 


: 


ANNs 
ie 


1 
fie Bi 
hie Bie 
Ole 000340 

: i eae 
Hee Ge 
012767 003716 
052777 000100 


Ba ESS 
es 


ae 


8 
3 


é 
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0327 


ries — OF UFEER OF TERATIONS 


STE 


ree ee 


&., 

NDICATORS 

#100, aSTKS ;SET IE BIT IN KEYBOARD STATUS REG 
STKISR, QUTKVEC SETUP KEYBOARD VECTOR 

wre gt IKvECs 

STPISR, a8 

#PRY. JRTPVEC+E 
aenotyPE sCLEAR 'NO TYPING’ INDICATOR 


CH 
TS _AN nocaToR ih Pt. -CP ACCORDINGLY. 


ol ial 
Tw 


RO sl CLEAR CARRY IF ie LOATING POINT 





s CONTINUE 
; INITIALIZE MAP TABLE 





fd #2 
eRe aHSTAT Rl BET BOORESS. 0 STAT 
sop tn 4 furiariee SfATUS TAELE 
ae #SUBPASS HIM ous TO ASCII 0 
‘ ; Be = IME BUFFER 
i {ho adhe Wren 
ie berinenrs3 + TNSERT TERAINATOR 
872 037 HEBUF +6 
#340 os Be tiFTesr tp C ALL INTERRUPTS 
tie a arto 
ssTAx, SP me Fate POINTER 
SatOTVECee 3; cf 207 VECTOR FOR SCOPE ROUTINE 
BSERAOR, J8EH a oe Toe FOR ERROR ROUTINE 
peat aMTVEC 
iat live eer FOR TRAP CALLS 


Evel Oh FAILURE VECTOR 
#340 facet 42 33 


¢. SLPeoR ; roca S Bitess rns FOR SCOPE 





CP & CP OPTIONS THE PROGRAM IS RUN- 









sSET UP ERROR TRAP TO RETURN 


a + 
#RESVEC+2, JHRESVEC sAND ALSO RESERVED INST TRAP 
#2 SsRESVECtE 
#144006, ;SET 11/70 NON-OPTION BITS 


31S AVAIL. COPY FLOATING CC’S INTO PSW 
;BRANCH IF NO FLOATING POINT 
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020000 #FPOPT , Re ;SET FP OPTION AVAIL INDICATOR 
177546 as ;BRANCH IF NO KW1i-L 

#LKOPT, Re ;SET OPTION INDICATOR 

a$TPS ;BRANCH IF NO CONSOLE TTY 


8TTOPT,Re 
R3 


ow 
_ 


6$: 


7$: 


BUM 


oO 
re 


9S: 
31S UBE1 THERE? 

> BRANCH IF NO 

21S THIS A TESTER OR EXERCISOR? - 


;BRANCH IF TESTER 
;SET INDICATOR 


NAO DBMMNAOWMWNHAOW 


Pesan 
ae 


-1S UBE2 THERE? 
sBRANCH fF NO 


SET OFFSET IN R3 


= 
~~ 


bo ee 
REBRVBS 


ESRC 


31S UBES THERE? 


ge a IN R3 
Eee a 


*PUT OFFSET IN R3 


3 
w 


Hoses eBeSeme saan S 


~ 
40 


a 
a 
; 
2354 
? IS 


See e ses eses 


NSE RU ORES 


GET BORED OF USE TABLE 


‘eure TABLE ENTRIES 


sADJUST OFFSET FOR UBE VECTOR 

sADJUST UBEVEC ENTRY 

sADJUST UBEVEC PSW ENTRY 
;INIT R3 


eee 
chs 


315 MASS as TESTER THERE? 
SET OPTION AVAILABLE 

;15 MBTe THERE? 

BRANCH IF NO 

*SETUP R3 


SEP PE 


pein i RERERPRRRE Ia Se Sabie cat 


ean 
a a 
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M CRO-BR AK REGISTE 


Ces Gas 


aes 
Saaeee Bs 


PRsc1z < b evemanose-1} OE" "he 11-50 CPU EXERCISOR™<CRLF> 


| ISR ees 


TESTER S 

His Hout 
FOLLOWING DEVICES: RPOY, AND 

INF ORPATION aes ST ie ere ZE" IN THE FOLLOWING FORMAT: 


UP: eWeecwesereewewss we (i 
* Ie 


| aneeeeaanennennennnantenesaienees 





s ESR ANRUERERRSMROTON Ma Sanson Baw mAZERE RSE MAIER 


= 





1$ 

5 TN4 51S MBT4 THERE? 

0 BRANCH IF NO 

#300,R3 

21$ 

#-1 

SuatT JY T SS OF MBT TABLE 
i | SpB EOUNT 

R3, (RY)+ it ee MBT TABLE 


258 
+ SeRBTTBL +26 ay IVE TYPE ADDRESS 
#7, OMBTTBL+12 ;SET 

»OMBTTBL+26 ifs wis, geAL BEAL A MBT? 


SNBTOPT. R2 CLEAR TION AVAILABLE BIT 
#ERPRT, OHERRVEC RESTORE ERROR TRAP 
HRESERR, JSRESVEC; RE INST TRAP 


Re, a80Pt. cP sLOAD INDICATOR 
bd Helene EP ho 
ia aete s3QCT A? se 


F YE 
33 TYPE aseiz STRING 





SEE EEE Eat SAE SESE IEEE EEE 
OF Temas ue DRIVES ARE AVAILABLE ON 











sil 
HIS ORD NDICATES WHICH DRIVES ARE AVAILABLE 
e: THE HIGH B rion ROUTINE WHICH DRIVES HAVE BEEN USED 


Heseieeeeneees 
Tree SETUP TIMEOUT MVECTOR 


#21$,a 
gasThPO : STMPO 
H 0 SET THE UNIT AVAIL BITS 
#10, : COUNT™ 
ore eo SEND CDRIVE RESET 
ty ORRER 3NON EXISTANT DISK? 
>BRANCH IF 3 
R2 GET DRIVE STATUS 
#1 37 Re 2GET petits S 5 7, ONLY 
i i BRanGH FNO | 
178,RO SET UNIT AVAILABLE 
#1, ORK CLEAR T ORS 
#20000. SuSTMPO >SELECT HEX? Unt? 


Ro’ aasyssize+2 STORE IN TABLE 











en pe 
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yPEORCSYSTEN SIZER 


Kee. 


aes 
ee 


fg Cope DETERTNeS IF THERE, Te APIS OF A POY OF BETH, 
T THE OPERATOR TC 04 
Re Wo hal Wie Raion MUBT, CHEN. The ero 


12737 oo0c04 ais: MOV #1 
176710 TST as 
& 


MOV 


1$, QHERRVEC SET THE ERROR VECTOR 
176710 71S THERE AN RP ON THE SYSTEM? 
*STAY HERE IF YES 
RRVEC 
ohn IST oRPaCSI 51S THERE AN RPO4 ON SYSTEM? 
TT iiittiiiiiiitii it iiiiititititiitititititiitititittititt tee 


s LELLLLLLELLLLLLLLLLLLLLLELEALLLLLLAL ALLELE LA LALALELA LALA AALAAEE 


He 
e 
49 
a 












e442 
3 
? 
1 
sie3 4 012737 00476 pq0094 ié: HOY 10S, ONERRVE sSETUe TIMEOUT VEC FOR RPO3 TEST 
AOUEEE eae CLR ‘ tieeD. 10 SE cy UNIT AVAILABLE BITS 
6 r 10 MOV #10,R1 :S0B 
276 175210 35: MOV aRStMPO, IRPSCS :SET FUNCTION IDLE WITH UNIT NO 
1 TST *WAS THERE AN ERROR? 
00006 BPL &S BRANCH IF NO 
4g: ROR “UNIT NOT AVAILABLE 
000400 001276 ADD #400, 28STMPO >SELECT NEXT UNIT 
zie il S08 R138 > CONTINUE 
0047 1 1751 6S: MOV DRP3OS, R2 et Bt ATUS REGISTER 
IC #136377 T 14, 3, & 8 ONLY 
FB ee bi me uReE FA Bio 
fe oot poc4o0 BIS #8178,RO 2SET DRIVE AVAILABLE BIT 
Se poses T1008? 0c: 506 cs: MOVB  RO,asSYSSIZE CONTIN IN TABLE 
ik oEESEEREUELRRLSELLLESELRLEL SES EL ERE LESSEE SESE SE GEARS SEER SER LEE SS 
O0s0s6 ooocoy ids: Mov #118, QHERRVEC ;SETUP ERROR VEC FOR RPOY TEST 
| l CLR a 
CLR ;UNIT AVAILABLE WORD 
2 oe an 
ae 172168 “MOV #21, JRPICS1 Tay me Sie Ba 
010000 175144 BIT uBitle, aRPNCS2 IST NT DRIVE? 
1 1 i BRANEH 
73h Bre #1 . ie phe 8, 8 & ONLY 
ry $10500, Az er Apy?” 
000400 ~ Bis T8,RO ISET UNI 
1 go0049 175110 : 13 OBITS TS, aRPHCS2 pce ae 
1276 guSTHPO ine NEXT DRIVE 
001616 MOVB Ro’ Sevssize+i0 IN TABLE 
a] oEREEREEL RELA SRRSL ELAR LASERS SAE RKAK PERERA ELE SHALKEYRHKE LE RRL RSRERE 
005056 oosits ooooo4 iis: mov #15$, J#ERRVEC ;SETUP ERROR VEC FOR RSO4 TEST 








MAINDEC-1  eneeeat” 


DE@KCB.P il 
e498 





ESAS eas ea MMA EAU A ea aa 


Ce aw + + 


WSTEN SIZER 


4: 


_ 
~ 


a 
oO 
r= 


i 


= 


0S4762 
001470 


001227 
1504 
003241 
001200 
041566 
005336 


177776 


175040 


001606 
001612 


177570 
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cLR aeSTMPO 
V #10,R1 ;S08 COUNT 
18S: HOVE o4sTHPO aRscs2 sSeT UNTT NUMBER 
BY tee akscse :NON BYTSTANT DRIVE? 
BNE 16 ‘BRANCH IF YES 
sae eT BEET «7 ony 
¢ #10200, Re : t Apye’ 
BRANCH IF NO 
BI #8178, RO *SET DRIVE AVAILABLE BIT 
ween i ie oF Ts,aRscs2 FAR ANY ERROR BITS 
§ 
ine he SeeRR INU ONT 
MOVE RO, a#SYSSIZE+12 STORE IN TABLE 
9 
‘NEXT TE XXDP UNIT 0 FROM TABLE 
is: “Chea “ge, ged 3PK? 
BNE BRANCH IF NO 
BIC $8170, 8S YSSIZE+2 *MAKE UNIT ZERO NOT AVAILABLE 
198:  MOVB as4 GET LOCATION 4 
I 1 ,RO T SIG 3 BITS 
are SPRSURE C 
ROL RO ADJUST 
CMPB ss #2, RO : 
BLT 4o$ *BRANCH IF NO 
BIC #8170, deSYSSIZE 
40S: BIC 8170, SYSSIZE+4(RO) 
BNE LOOP ;;BRANCH IF NOT FIRST TIME 
TYPE MSGeS 
MOV d8OPT. CP, -(SP) 
TYPOC 
TYPE SCRLF 
TST a8OV 11? 
BNE L IF YES 
SOS TSTB  a@&#XXOPC foc CHAIN MODE? 
BNE LOOP ;;BRANCH IF YES 
S 8SPASS FIRST PASS? 
BNE LOOP  ;BRANCH’ IF NO 
BI #SWi7, Q8SWR s INHIBIT SIZE TYPEOUT? 
BNE LOOP ;;BRANCH IF YE 
J PC. TYPSIZ -GO TYPE SYSTEM SIZE 
TYPE ss TYPE aSciZ STR Ne 
BR *:GET OVER C12 
jabss: ASCIZ /TYPE A CHARACTER’ TO CONTINUE/<CRLF> 


aePSW 


0 


Tall wS17E GO CHECK SYSTEM AGAIN 
PROGRAM RESTART AFTER RELOCATION ABOVE 28k 1S COMPLETE. 
tTNITIAL TSE” TREP VECTORS 





MAINDEC-11-DEQKC-B P 
DEQKCB.P1l SYSTEM 
2554 O0S406 


Pepe VUES EMEMEAMA LEA Ga a ca orci 


ot 
cite 


5e03 179997 
Aaa 
ge 
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000700 LOOP:  MuV SSUPSTK, SP ;SET THE STACK...WILL BE DIFFERENT 
‘THAN KERN STACK WHEN IN OUTER 
oo0004 MOV #ERRVEC, RO 
; MOV asPSW.RI GET T CURRENT P PSW 
be5Que MOV #ERPRT, (RO)+ 
o00346 BIS #PR7 Ri SET pRIDRITY 7 IN LEeRENT DSW 
BI #B1T4. Ri CLEAR T BIT 
MOV R1, (RO)+ 
053366 MOV BRESERR (RO)+ ;SET RESERVED INST TRAP VECTOR 
MOV Ri,(RO)+ 
0014 MOV #SRTRN, (RO) + ;SET T BIT VEC 
ae #PR7, 2 
i (RO)+ SET TBIT VEC+ 
Ist (RO}¢ BUMP RO TO s¢ VEC+2 
oo0006 bp 86, RO SET BO Te TRAP VEC 
000340 HOV APR? (RO)+ :SET ERROR VEC 
000340 ; MOV #PR7, (RO)+ SET TRAP VEC+2 
Os2640 000114 Hoy &. , BECACHVEC :SET PARITY ERROR VECTOR 
BIS #PR7, Ri 
000116 MOV Rl, JSCACHVEC+2 
05307¢ 000250 MOV akt BRT» c ;SET KT11 ABORT VECTOR 
Ri C+2 
000340 177776 BIC SAD asPSw 
s TTT TTT TTT TT TTT TTT TTTTTET TT TTT TTT TTT TTT TTT TT TTT TTT TTT TTT TTT TT 
TEST i MEMORY VERIFICATION TEST 
; cae TSI LOAD TEST NER 


S 


001512 


RES 3 Gee 


RELO: 


age” soo 1 keto 


-SBTTL START OF SECTION 0 
FIRST ADDRESS TO BE RELOCATED 000000000 


MOV : 
TST -(RO) ?RO AINS THE ADDRESS OF RELO 
MOV =|, i CavES ) 

MOV PC, ;GET CURRENT 

SUB #., SUBTRACT RELOCATION. FACTOR 

HOV RO, ae OcATION 

ADD #3b, a et Gane 

MOV PERR,@ SRSLPROR 

S18 its BR IF TEST CODE TO BE EXECUTED 


JMP RELEO 
; MEMORY ~ DISK (IF SELECTED) VERIFICATION TEST. 


1 
-1,71,71,-1,0,0,0,0 


- WORD 
-WORD -1,-1,-1,-1,0,0,0,0 
-WORD <-1,-1,-1,-1,0,0,0,0 


MAINDEC-11-DEQKC-B POP 11 
DE Pll 


1 
START OF 


a 
ee 
ou 
zc 
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won 
m 


CT 
00S71e2 


¥ 


«WORD <-1,-1,-1,-1,0,0,9,0 


BS 


: 


-WORD <-1,-1,-1,-1,0,0,0,0 
«WORD -1,-1,-1,-1,0,0,0,0 
WORD <-1,-1,-1,-1,0,0,0,9 
“WORD -1,-1,-1,-1,0,0,0,0 
-WORD <-1,-1,-1,-1,0,9,0,0 
-WORD -1,-1,-1,-1,0,0,0,0 


WORD <-1,-1,-1,-1,0,0,0,0 


Scenes eee 


—9 
o 


-WORD <-1,-1,-1,-1,0,0,0,0 
-WORD -1,-1,-1,-1,0,0,0,0 


WORD -1,-1,-1,-1,0,0,0,0 


stotaitat sata 
ANLENERVS 


-1,-1,-1,-1,0,0,0,0 
-1,-1,-1,-1,0,0,0,0 
-1,-1,-1,-1,0,0,0,0 
-1,-1,-1,-1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


QKCB 
2610 
3 
1 
1 
14 
Pele 
18 
ebel 
ebee 
2623 
ebe4 
| = 
2630 
2631 
eke 
2634 
2635 
2636 
2637 
bed 
2640 
seie 
Be 
2645 
eb46 
es 
2651 
a 
SS 
2656 
2657 


By 


aes 


-1,-1,-1,-1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


SSE SEES 
pee Rf 8b RS 8b 8 ee 


-— 
“ 
5 


~1,-1,-1,-1,0,0,0,0 


os 





cr 


MAINDEC-11-DEQK 
Deuce. Pil 


006364 


vf 


436 
444 


Nasa Saute SHS OSEIPAS GNSS SR URRT ERS BOBARRE RR ER Ia iat Jain ae ke 





“Stak 


at 


oO 
onli 


Bar SENSE 


= 


oo 
ome o— (0-2 


58 S8esre- 
-— 
ee 
on 


a 


Hg 


22 


T 


NAAN AA AE 


e NEE 


oooon2 
C0000! 172512 


eee 
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WORD 


. WORD 


- WORD 


3 eo: SCOPE 
MOV 


ADD 
MOV 


RELOO: 


;0000000000000 LAST ADDRESS OF CODE TO BE RELOCATED oo000000000 
33 a eescaaae y  r reramarin 


;#TEST 2 


ss SEELLLFELELLLELSLLLLLLLELLLESELALLLLELLLLLASLELL LE LE LEAL LLRLELE 


WORD 


tét2: Move 


qa 


=ig ue 


] 
wr 
4 


TTL 
111 F 


= 


BS35ss 


Bas 
wo 


co te 


So % 


-1,-1,°-1,°1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


-1,-1,-1,-1,0,0,0,0 


-1,°1,-1,-1,0,0,0,0 


-1,°3,71,71,0,0 


nie Re 
arELOC, PC 


, asSTSTNM 
#1,STIMES 


;G0 RELOCATE PROGRAM CODE 


LOAD TE 
::D0 1 ITERATION 


START OF SECTION 1 
O BE_RELOCATED 111111111 


ADDRESS 


;GET PC 
;RO CONTAINS THE ADDRESS OF RELI 


*GET 


CURRENT 
ieee 


PC 
OCATION FACTOR 
ION FACTOR 


;SET LOOP ADDRESS 


;8R IF TEST CODE TO BE EXECUTED 


;CC’S=0000 
SAME AS BLO 

















RRERRRBR ESO uGnen ann nan 





72 . 


74 


MAINDEC=-11-DEQKC-8 
DEQKCS.P1l 


STAR 
00404 


= 


~ 


as 


ee 


ene 


ee Gee 


rc 


as 


Sin 


ne 





of tcZP CPU EXERCISOR 
SECTION 1 


000003 001202 


BMI 
BLT 
BLE 
BLOS 
BHI 
Cco: HLT 
; CONTINUE 
2 
BGT 
SLT 
CCl: HLT 
; CONTINUE 
SEV 
: 
CCe: HLT 
; CONTINUE 
SEC 
BCC 
BH 
BG 
Co3: HLT 
; CONTINUE 
SEZ 
BNE 
BGT 
BHI 
ns, 
5 5 ReRRE 
2 &TEST 3 
té13: move 
SCOPE 
;CLR RO 


CLRO: 
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cco 

aaa 

ECO 

sONE OF THE ABOVE BRANCHES FAILED 
:€C’S=1000 

CCl 

Ce} 

ef 

: SONE OF THE ABOVE BRANCHES FAILED 
3CC’S=1010 

¢ 

Cc 

3 

. ERROR! ONE OF THE ABOVE BRANCHES FAILED 
sCC’Ss1011 

c¢3 

a 

; sERROR! ONE OF THE ABOVE BRANCHES FAILED 

ah sCC’S=1111 

éCy 

, sERROR! ONE OF THE ABOVE BRANCHES FAILED 


Titi 
TEST U UNITARY CONDITION 


CODES 
i MOVE a3 OSSTSING LOnD Teel MER 


83, J8STSTNM ;LOAD TEST 


;RO=0,CC’S=0100 


;ERROR! INCORRECT CC’S AFTER CLR 


;RO=0,CC'S=0100 
















shroemeg rE 


~ 





ss 


Seiad eos 





~- 
B2 


ats 


— — 
é 8 
== p= 


Oo7bes 
EB 


000261 


8 


Be 


= 


8 
8 


bas bo hp be epee 
ok ee 
PUM cs 


; 


BS Pas et Pee Ft Bw Gan Be a en 


RSPAS oie LLL ePRPE SR RR OEP Er ED EEE SS 


Bass Sagasass sagaesseasesssss 


on ees 


Bs hos bat Be 
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BMI TST0 
BLOS #4 
HL ERROR! INCORRECT CC'S AFTER TST 
ece 
5 aheet RO=-1,CC"S=100! 
BCC COMO ie. 
BVS COMO 
BEG COMO 
COMO 
BLT +4 
HLT ERROR! INCORRECT CC’S AFTER COM 
SEC 
ADC =—s_« RO ;RO=000000, CC’ S=0101 
Be 
BGE +4 
HLT sERROR! INCORRECT CC’S AFTER ADC 
SEC 
fee RO ;RO=100000,CC’S=1010 
BEQ ROed 
BL —_RORO 
BG +4 
HLT ERROR! INCORRECT CC’S AFTER ROR 
y 
¢ 83.—s«#R2OD :R0=077777,CC’S=0011 
BCC  DECO 
BvC bes 
BE ¢ 
[oo 
BLE 44 
HL sERROR! INCORRECT CC’S AFTER DEC 
cee 
INC RO ;RO=100000, CC’S=1010 
BCS INCO 
ea (ca 
BPL INCO 
BGT +4 
HLT sERROR! INCORRECT CC’S AFTER INC 
¢ 


;RO=100000,CC’S=1011 









ie 
% 
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ITION CODES 


t-te 
bo pe 
: 


8 
é 


e 


eh 


be 


See 


GS bee 
one 
S58 


8 


: 


ees 2s 6 


3 


~ 


f 
¥: 
eS 


- 
- 
a 
= 


: 


Si oe 


PERCU LEG CERES RRR LiL eg UG 





ION 

BYC NEGO 
es Neto 

NEGO: HL ’ sERROR! INCORRECT CC’S AFTER NEG 
SEC : 
ASL RO ;RO=000000,CC’S=0111 
Buk ASLO 
VC ASLO 
BNE ASLO 
BMI ASLO 
BLOS +4 

ASLO: 4HLT sERROR! INCORRECT CC’S AFTER ASL 
ROL RO ;RO=000001 , CC’ S=0000 
Bcs ROLO 
BLE ROLO 
BGE +4 

ROLO: HLT sERROR! INCORRECT CC’S AFTER ROL 
BSR RO ;RO=000000,CC’S=0111 
Bc fen 
BLT +4 

ASRO: HLT sERROR! INCORRECT CC’S AFTER ASR 
ack RO ;RO=-1,CC°S=1001 
BCC seco 
BVS SBCO 
ELE +4 

SBCO: 4HL sERROR! INCORRECT CC’S AFTER SBC 
NEG RS ;R0=000001,CC’S=00001 
SWAB 3RO=000400 ,CC’S=0100 
BCS SWABO 
pHABO 
BCE 

SWABD: HLT *ERROR! INCORRECT CC’S AFTER SWAB 


7 HGHMMH HEHE HHGBHHBHHBH GHEE HEH HHBHB HEEB HHHEEHBE BE HEHHGHHEE 
TEST 4 CHECK REGISTER SELECTION 


oo ELS ERE LL EESRERELELSYE SYREEERRERLSLEKLE LEEKS ELERHSREKS SEEGER EE LSE 

ooo004 oo1202 tST4: Move #4,as8STSTNM sLOAD TEST NUMBER 
000005 001316 HOV , 85, a4STINES ;SET ITERATION COUNT TO 5 

Scc 

ROL RO -RO=1 

MOV RO, Re 

ASL ;Re=2 

MOV »R3 

ASL ;R3=4 

MOV ,R4 

ASL 3R4=10 
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& = & 
a = a2 ° 
Pb BIE & 52 & 
en > : 7 EE : : ; ‘ 
z “428 + = 2 
| gi. 8 5 Bx f Be 
a eo 
at w — o« : pa di -_ 
are: — 5; sie 5 ae 
ty 
: * : 4 4 e 
haaaat 2 2 3 & 
eee Ee fe . # : 
zevzeveo* & Sevet Se wene* seset% Szeezt ceewowt 3a 
2 ti 
> ini — oO - Oto | oad -— e = 
Fayofaparatatas sieggegs SugSavESS SESS S8eney Seedsass a 
x x 


- 4S: 


babs 
Seatac: Gal: Si Se Se Se 


CEccucsses | BLSSKes GSEEGSEGe Geceee Bebeee Gesceuke 
GEER EEE Ca ERLE 





007512 





007514 





NY 


: 
a 





1 


Se 


3 


bet 


g 


Bes 
= 
N 


o 
Ot fee 


oo 
ie 


aces 


— 
oO 
ro 
in 


I 


i 


£2 se 
g eg 


CUM 
ae 
ASR 
73: bee 
INC 
BNE 
i 
gS: HL 
*CHECK TRANSFER 
177776 &STST: BIT 
MOV 
1S: WORD 
MOV 
es: . WORD 
177772 INC 
177766 3S MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
000340 177776 BISB 
MOV 
~ MOV 
177730 : hove 
000340 177776 BICB 
177760 CMP 
BNE 
177714 fe 
SS: MOV 
nay 
MOV 
MOV 
HLT 
177662 MOV 


RO TNOEC. 1} -DEaKC=6 POP EBA ER Ehecraon 9H 27(732) B08, 10:46 PAGE 72 


+R2=-1 
Re,R3 
Re sR2=LOOP COUNT 
R3,R4 
R ;DECREMENT LOOP COUNT 
RS CHECK R3 
RY CHECK R4 
+4 
OF REGISTER DATA BETHEEN THE GS AND cD REGISTERS 
820, J8PSW sCHECK IF ’T’ er 1s SEI 
7s" :SKI IF ’T’ BIT SET 
SP, (PC)+ ; SAVE STACK PTR 
0 j CONTAINS SAVED STACK PTR 
PC, (PC)+ ‘LOAD DATA CURRENT PC IS USED AS 
0 DATA. IF THIS TEST F FAILS as CON- 
*TAINS THE DATA 
2s *MAKE ODD TO CHE Bit 
2$,R0 | LOAD GD REGISTER 0 
RO,RL GS REG O TO GD REG 1 
RI. Re "AND GS REG 1 TO GD REG 2 
Re, R3 : eee 
R3,R4 
RY’ RS 
#340, asPSW ;SET PRIORITY LEVEL 7 
RS, SP haere 6S REG S TO GD STK PTR 
SP, (PC)+ ER TRANSFER GS Stk PTR 70 MEMORY 
1S, SP s CONTAIN cf BTR NEEDED FOR HLT/SCOPE 
#340, J#PSW *SET SET PRIORITY LEVEL 
4§,RO ;COMPARE GS/GD vek Oo WITH GS REG 0 
cs *BRANCH IF WERE NOT = 
3 ‘SHIFT TEST DATA UNTIL = 000000 
RO, -(SP) sGET Bs REG O 
R1,-(5P) sETC. 
Re, ~( ) 
RY’ (SP) 
RS, -(SP) 
sERROR! DATA IN GS STK PTR NOT = GS REG 0 
ig REG O0-GS REG S ARE ON THE STACK 
1$,SP STORE STACK PTR 


78: : 
o LESEXZSESLASSZHEERESSSLRERSEMES LEER ERLE RSLS RERAARH RES CR ERSRSEKEY 


oooc0s 01202 jute 






| JHHHHHIHIIHHIHIGHEHIEHHHHHIHHIH EI HHHHIHHIHHIEHHHHEHHEHHHE 
MOVB) = #5, d#STSTNM ;LOAD TEST NUMBER 











PLC ee Ee Re cease Mais ASMieic inp iaieiteteitecisie ert 





QKCB.Pil 


SSe Halal dasa acs 


ooo00o 
ee er as f= Ga be Foe i a 


GROsEe SRUREN ORGS RORERE 


Gh ht he pe 


TS 


race 


oosoie 


ee Ges Be 


Be 
=—T=4 


ae 


28 
a3 


58 

— 
-_ 
- 
rT 


es 
ge 


Bonar 
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: 


—— 


PereeCe ti -ceacS POP 11770 CPU EXERCISOR 
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MODE 1 


TEST UNIARY WORD INSTRUCTIONS USING ADDRESS 


000005 001316 


ocooo4 


RORI: 


MOV 


a 


23 


om 
B 


ASSES SEMSSS GeGor MBRSHe Kmcaness EReses ERS 


#5, deSTIMES 


be Re 


) 


= 


&: 


288 0-388 


aes 268 FERS TERRE 
DD 


S35 28835 


= tb 
DDD 


( 
R 
R 
R 


+ 
<= 





sRESERVE ADDRESS FOR TESTS ; 
;R2 POINTS TO RESERVED WORD 
sPRESET (R2) 


; (R2)=100000,CC=1010 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R2)=077777,CC=0011 


;ERROR!? INCORRECT CC’S AS SHOWN ABOVE 


; (R2)=100000, CC=1010 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R2)=000000,CC=0111 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R2)=000001 , CC=0000 
;BRANCH IF C OR Z IS SET 


; (R2)=000000, CC=0111 


sERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R2)=100000,CC=1010 
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11 27(732) 


IONS USING ADDRESS MODE 1 


MACY 
T 


DEQKCEPLT 78 TEST ONLARY WORD INSTRUC 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
;ERROR? INCORRECT CC’S AS SHOWN ABOVE © 
;ERROR! INCORRECT CC’S AS SHOEN eeove 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


_ Oo oO _ ot 

a 8 3 sr 3 8 g 8 

7" in ; 1 & m a ; 

$ $ g $ 8 8 $ 3 

Oo 

x x m x n x x x 

@ a & a @ & @& & 

— ~ a ‘se — — ee — 

- oo oe o~ on o- o oe 

aca res 
oie Roe hoe) NT tte Coe cee kon) 7 Nt te — —to-48 “Fee tnt 
r OOO oO nuw oor 

Senet she seat &§ Sgggt Sat RRent 86 Bg 

LOO 


INC1 
SBC1: 
SBCIA 
ASLI: 
COM 
TESTI: 


our 
SESS sae Seen Seat eae Spann, jaan pas Maen as ban bon I on, boon bam bom Lom boom boon MR ms, hoon hoe Dom Looe] pts ‘ 
aiebebabebeban app es! sn bom hams ban bam bom han Shon Lon Lom bon Mien bes ben low Len lo los Be ee ee | SSS ses SS3es 
2000000 2800000 8000000 F28000 C80000090 280000 GO00000 G2QO000 


 BESARE ARE SS RSENS Ra Ren ARSE Rep RF Senn Daas = 








DEQK 
114 


~ 
FUTUTUlU ~2— 2 oo 
Ww Sion out 


~BBSVRRY 
Oooo0o0 F80000 BOOOKOOOOoOO0O 2800000000 


9GIGI GIG) GIGI GIGI GIG) GIGI GIG) G) GG) 0) GG) GG) GG) GG) G0) GIG) GI GIG) 0) Gd) GI GI GI) GIGI GI LUI GI LI GIGI GW) 
SUEHREGD-SSSVRRL OO 655A ES SSBVRRSOB 


Oe he bm hh Fb bb bb fs 2 0 he me hs Be Fs 2 bh hs Pe hs ph ee = Be ho he ph pe 


2 


Pll 


010216 
019220 


a o 
oes EES 


Bien SHON) RBsss SREROSSNGPORE MORDTEORS 


ee eh a ee et ee 


a 


mia 
++ 


T 


TS 


a 


hae ee Faciniaty 
-_ 
£ 


ase i 


R 
eo 
—f 


BR Pec pat fas ps 
Ww 


S500 to 
= ae é 
a -_— 


: 


000006 O0i2de 


MAINDEC-11-DEQKC-B POP a CPU EXERCISOR 


NEG1: 


C1A: HL ;ERROR! 
jtHHHHSRGROEEELEEEENEEAAEELEEEORESSOEEEEOHASEESEEEEEOOESEOEES 


MACY11 27(732) 
UNIARY WORD INSTRUCTIONS USING ADDRESS MODE 1 


HLT 
DEC 


a 


(Re) 
DEC1A 
+4 


K UN 
Ptiiiritititiiiiiititiicitiiitiiiiiititiitittitiiiti titty 
: OeSTSTNM ; ST NUMBER 


tETEST 6 CHEC 
téts: Mo 6, 
MOV PC,R3 
SUB wR 
MOV —sR3ERY 
INC RH 
CLR 4s (R) 
is: Be cra 
BMI 
fies Ry) 
BR 1$ 
es: +4 
HL 
fRes (RY) 
pcs INCI 
ave NCBI 
OME +4 
INCB1: HLT 
ROLB  (R4) 
BCC —- ROLBIL 
BvC —s- ROLBIL 
BEQ iw 4H 
ROLB1: HLT 
SBCB. CCR) 
Bcc ©—-s SBC 
a SBCBI 
BM +4 
SBCB1: HL 
ASLB (RB) 
BCC 83s ASLBI 
BVC —s- SLB 
BEG tié«i«éS 
ASLB1: HLT 
NEG (3) 
NEGBL 
BVS —NEGBI 
BEG 
NEGB1: HL 
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;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R2)=000000, CC=0101 





! INCORRECT CC’S AS SHOWN ABOVE 





sL 


;RESERVE A WORD 
;ADDRESS RESERVED FOR TESTS 


3R3 POINTS TO EVEN BYTE OF WORD 
3R4 POINTS TO ODD BYTE OF WORD 


;PRESET DATA 


HONE eveN BYTE BeConEs NEGATIVE 


; INCREMENT ODD BYT! 
; (R3)=077600=[0774) (200) ,CC=1010 
; (R3)=100200=[ 1000) 200), CC=1010 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=000200=[0000)f200) ,CC=0111 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=177600=[ 1774200), CC=1001 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
3 (R3)2177400,CC=0111 


sERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=177400, CC=0100 





;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
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e2ece2 
See 


bb Ps bb = Fb > § -< & 2 = HP HH Pe He 
oo0o000 
Pb bb pe 


Riars Sened 39 


Se feeeee 
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SEIFRKLESLSSBIK RIG BIsasrtctazs 
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tat tatattad 
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fon Bsaase Ste heaad 


ooo Eo0o0oOoO GCOOoOoOOoOMm 


Pere a 
CrtTMy © 


DEQKCBPHT te OMERK 


: 


Be 
— 
Go 


es 


to 
geet 
SS ce 


ae S 
88 
rw 


aR 
-— 
££ 


KOM 
BS 
8 

es 


~ 
i is 
oe So- 


— Pe 

- 

- fame 
£ 


—e —— | maa 
-_ - 
Ge -— 5M 


SOR 
TE 


DECB1: 


RORB1: 


ASRBIA: 


RORBIA: 





INSTRUCT 


e238 2992 


(R3) 
DECBIA 
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SS MODE 1 


; (R3)2177777 ,CC=1001 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R3)=177577,CC=0011 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=000177,CC=0101 

;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
;SHIFT EVEN BYTE UNTIL V CLEARS 

;AND ADD CARRY TO ODD BYTE 

;ERROR? INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=000400, CC=0011 

;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R3)=000000, CC=0100 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R3)=100000, CC=1010 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


; (R3)=077400, CC=0100 


; (R3)=077777, CC=1001 












ae 18 oi 


10524 104000 DECB1A: HLT 





NC OE Cc 
1638 $0813 as 
1 1 gcS 
i i 1 BVS 
1 1 SWABL: hy 
ne ie 
SS 

104000 TSTB1: HLT 








ASLBIA: HLT 


BPL 
1 COMB1A: HLT 


0 0 ee eh hh he eh eh he oe 


OeRonees kor Sess Sones f 
ae 





: 5 





ne be bs et be 





th | aeaaa POP 11/70 CPU EXERCISOR MACY11 27(732) 
TS CHECK UNIARY BYTE INSTRUCTIONS USING ADDRESS MODE 1 


prereeee 
28 

E 

8 

we 

= , 


DECB1A 
+4 


#400, (R3) 
+4 
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;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3I=177577=21 17741177), CC=0000 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
3; (R3)=177577=1 17741177), CC=1000 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=000177=(00001[177],CC=0100 
;(R3)=000376 ,CC=1010 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R3)=000001,CC=0001 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
;(R3)=000400, CC=0100 


; (R3)=000400, CC=0100 
;CHECK REMAINING RESULT 


3 TELS npens tite eat ebtEe stat eaten 






He 


;ADDRESS RESERVED FOR TESTS 


R4Y AND RS POINT TO 


i RESERVED WORD 


;PRESET DATA=0 





SERRESHT OCT FO ARETE cs ul RE lS OS PE 7 


3282 010668 000277 Sec | 
10666 000244 CL2 
3284 19679 005725 Ist (R5)+ ; (R5)=000N00,CC=0100 
ee ea jet a TR 
10676 901401 E ‘ 
3288 010700 TEST2: HLT ERROR! INCORRECT CC’S AS SHOWN ABOVE 
a0 ahi 005145 on = 48S) ; (RS)2177777, CC=1001 
35q3 10706 100401 BMI +4 
010710 COM4: HLT sERROR! INCORRECT CC’S AS SHOWN ABOVE 
910712 1 CLC 
10714 ROR (R4)+ ; (R4)2077777, CC=0011 
3297 010716 BCC ROR2 
te 5 
0 l 1 ROR2: HL : sERROR! INCORRECT CC’S AS SHOWN ABOVE 
3302 010726 000257 ccc ; 
Fe 10739 o0S244 a (Ry) ; (R4)=100000,CC=1010 
1o7s4 | BoTaol INCH 
3305 0107 100801 BM! +4 
$307 10740 1 INC4: HL ;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
3309 O10742 000261 SEC 
$310 alors o00%e4 SWAB 3s CRY) + ; (R4)=000200, CC=1000 
$313 Biorse 100401 ae 
$313 010752 104000 SWAB2: HLT ERROR! INCORRECT CC’S AS SHOWN ABOVE 
a alae : NEG (Bs)+ ; (R5)=177600,CC=1001 
3317 010760 100401 BMI : 
3318 010762 104000 NEG2: HLT ERROR! INCORRECT CC’S AS SHOWN ABOVE 
3ie0 10764 gasps cLR ~¢R4) ; (R4)=000000, CC=0100 
33ce rstieagi 1 HLT ; 
10772 
3352 hier Goes RoR -(RS) ;(R5)=100000,CC=1010 
335 11000 oosses ADC R5)+ ; (RS)=100001 ,CC=1000 
3358 Bt 1oo4 105404 Bui +4 
$330 11006 1 apc2: HLT ERROR! INCORRECT CC’S AS SHOWN ABOVE 
3330 11010 000262 SEV 
$333 1ipi¢ oobeed BSR (Ru) ; (R4)=140000,CC=1001 
1 10240! ASR i, 
Sess a 
3337 Oil022 } ASR2: HL sERPOR! INCORRECT CC’S AS SHOWN ABOVE 





| 


MACYii 27(732) 
CHECK UNIARY WORD OPS USING ADDRESS MODES 2 & 4 


ore 10:46 PAGE 79 


eT eer POP 11/70 CPU EXERCISOR 
oSeS.P il 


Q 
Cy 


Be 


BaInaeeRe KEKE FeS 


CRUE 


ecVo 


SST 








;(R4)=100001, CC=1001 


sERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R5)=100000, CC=1000 

;ERROR! 'C’ BIT FAILED TO CLEAR 

; (R5)=077777, CC=0010 


sERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (R4)=177776, CC=1010 


; (R4)=177774, CC=1001 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


Ye ac gage on gree pe get te eee ge ae igs 

ikTE 1 UNIARY BYTE OPS USING ADDRESS MODES 2 & 4 

eEEE EEE EL SAELE SEES ESSE EET EA EEL EEESELEELEEEDEEELTESEEEEASAEEE 
MOVB EST NUMBER 


000010 001202 itt 0: 


Ee 


Oo 
_— 


a 


S 


Oo 
be ee 
Ste 


ss 


OoOo00000O OBO00000000 
B= GF bs Ps bt = bo {pees Bre Pent fe be Bs pe be 
2 bs fs he se he He fe = fe Fe 
Bt ee Fane Pt fine eee tne & Et edtoCoTrD 
FEVOTL CHeorLnsrs 


Bena De fae bee fhe 





I 


3L 

’ 
;RESERVE A WORD 
RESERVED WORD 
;RS POINTS TO EVEN BYTE OF RESERVED WORD 


;R2 POINTS TO ODD BYTE OF RESERVED WORD 
;PRESET 
; (RO)=000377,CC=1001 


;ERROR? INCORRECT CC’S AS SHOWN ABOVE 








MAINDEC 
DEOKCS. Pi 





Botta 


t =p - b= po pe 9 iT) 
o- o- 
~~? 


6-2 6 6 0 = pe = 0— $8 ~~ op pe 
gr 


SSeerers 
RiSecrarsee 
0-2 0 9 oe 
£ 


Pie b 2 pas eb o 


BORO 


Ce 


OoO00000 28000000 


Ooon000 
SRE BEE & 


es SS 
fin Glee 


BR 2 


bs ds br iors hp nie eae te ri 


SS ee) ee)! 


-11-DEQKC ISOR 
1 BYTE 


st 
tu 


SoBoDS 
o- 

~ 
——— 


pees 


oh hue bs 


BRE REE 
£ 
St en 


OPS USING ADDRE 
ALCB -(R2) 
i +4 
RBCB (RS)+ 
cS ADCB2 
+4 
AOCB2: HL 
+S5EC! SEV 
RORB -(RS) 
BCC RORBY 
BVS RORBY 
8EQ RORBY 
ent +4 
ROREY: HL 
sec 
ROLB (Re)+ 
BCS ROLB2 
53 ROLB2 
BE ROLB2 
BPL +4 
ROLB2: HLT 
ccc 
ASB (RS)+ 
pve ASRB2 
ASRB2 
+4 
ASRB2: HLT 
ines -(R2) 
ASRB (R2)+ 
BCS ASRBeA 
ASRB2A 
+4 
ASRB2A: 
'SEV 
-(RS) 
ASLBY 
ASLBY: 





MACY} 27(732) Wy tt 10:46 PAGE 60 
SS MODES 28 4 


26%8 2 
BBs 


goa * 


Sig ENSSg AZERRRG ERE 











; (RO)=000600,CC=0101 

;ERROR! INCORRECT RESULT AS SHOWN ABOVE 
i TRO) s000400, CE=0008 

;ERROR! INCORRECT CC’°S AS SHOWN ABOVE 


; (F0)=100000,CC=1001 


;ERROR? INCORRECT CC’S AS SHOWN ABOVE 


; (RO)=100001 ,CC=0000 


sERROR! INCORRECT CC’S AS SHOWN ABOVE 
;(RO)=140001, CC=1010 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (RO)=140002, CC=0000 
; (RO)=140001 , CC=0000 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 


ser 2,V 
:(RO)=100001,CC=100! 


hs 


;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
; (RO)=077401=(07743(001) ,CC=0010 


;ERROR! INCORRECT CC’S AS SHOWNABOVE 
;(RO)=077400, CC=0100 
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MAINDEC-11-DEQKC-8 POP Ah CPU _EXERCISOR 
DEQKCS.P11 T10 HECK UNIARY BYTE OPS USING 


SBCB4: 


NEGS4: 


TSTB2: 


TSTB2A: 


INCBe: 
000601 


3; ReEE 
S&TEST 11 


o  HEEEEE 
000011 oo12o2 S111: move 
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ADDRE 284 


SS MODES 


+4 
;ERROR! INCORRECT CC'S AS SHOWN ABOVE 
-(R2) ; (RO=10400,CC=1001 
NEGBY 
— 
;ERROR! INCORRECT CC’S AS SHOWN ABOVE 
(RS)+ ; (RO)=100400,CC=0100 
TSTB2 
+4 
(R2)+ ; (RO)=100400, CC=1000 
TSTB2A 
+4 
~(R2) ; (RO)=000201,CC=1000 
SWABY 
+4 
(RS)+ ; (RO)=000601=[0004) {2011 ,CC=0000 
INCB2 
INCB2 
INCBe 
+4 
(Re), #000GOE ;CHECK END RESULT 
Re ,RS ;CHECK REGISTERS 


K UNIARY WORD OPS USING ADDRESS MODES 38 = 


$11, a8STSTNM sLOAD TEST NUMBER 
+6 ; RESERVE 
31 FOR THE ADDRESS 
0 AND 1 FOR DATA 
PCR 
eY - 
(R3) ;PRESET DATA 
Ra,RO *RO POINTS TO DATA WORD 
RO, (R3) 
R3,R4 


















DO7 
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- 


NAINDEC-11-DEQKC 
=" 


; ‘RO)=100000,CC=1010 


; (RO)=s000000, CC=0100 
; (RO)=140000, CC=1010 
; (RO)=100000,CC=1001 
;(RO)=077777, CC=0010 
;(RO)=100001. CC=1001 
;(RO)=077776, CC=0001 
;(RO)=077777, CC=0001 
;(RO)=100000, CC=1010 


— #909) 


Fe Keo Roe Deen Keom Kee Bien Kee Kem Kees bon hom home |} 
Cn hee Kam Lew Kem ban Sie hee Lem dee ben len ben.) 
Qa00000 28000000 
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a re em ae ae re ne ae ee 


Raa 
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tte ret 
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RORERBINSES © fe 


2 ome 2 
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Bise06 
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Ooo00o0 F000 GOOOO00OOO0000000O 


2 P= he he Ph eo fee = foe fs Pao Bus hae fae ft fan phase Gace Gee Geo 


Reds 
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| 


70 CPU _EXERCISOR 
CK UNIARY WORD OPS USING 


SBCS: HLT 

gs FEESLEELSLA LE LE SELELH SSE ELEE LESSER LASSRRSSE ZY SSLEVS HEE SELES SES 
S&TEST 12 CHECK UNIARY BYTE OPS USING ADDRESS MODES 38 5 

© LEFEFLEFKEEFELELSLLL ELE LLLAA SA EAALSRSSESL SRL LA LALA RE AAAS SAHKEEE 
oo0012 oo12c2 tér1e: : TEST NUMBER 


COMBS: 


INCB3: 
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Buk acky+ ; (RO)=000800,CC=0111 
BVC ROL3 

BEO +4 

HL 

INC (R3) ;(R0)=000001, CC=0001 
pee (RY) ;(RO)=000000, ¢C=0100 





HOVE #12, 28STSTNM LOAD 
BR +10 SRE 
- WORD : :1 FOR ADDRESS 
. :1 FOR BYTE ADDRESS 
HRD 0. i “AND 1 FOR DATA 
TST -(R2) sBACK R2 UP TO 
TST -(Re) spATA WORD 

V Re *RO POINTS TO THE DATA WORD 
CLR (RO) *PRESET DATA 
wR) SVEN BYTE ADGRESS WORD 
TN Rp’ week $A AAD RBDRESS 
MOV RO, (R2)+ 5.080 000 BYTE ADDRESS 
mw ee tee 
oe al ) 3; (RO)=177400, CC=1001 

I +4 
HLT 
ISTB o-(R2) ;(RO)=177400, CC=0100 
HL 2 
SEV 
ASRB (RS) 3(RO)=177400, CC=1001 
Bee 
HLT 
INCB aR2)+ 3(RO)2177401, CC=000 
ert +4 
HL 
CLC 
pane ; (RO)=177400, 
BVC 
BNE 









PARMAR AS ANAS RATS AS 


i aaa 
es 


: 


SRSA SS PAE ATARI RS ee 


7 


atatad 
3 





ll 


eee Sococoocesoceeces 
forory «= forururorururorururororure 


FES KRENBERVNSSSHSKS 


MAINDEC-11-DEQKC-8 POP 
DEOKCS.P Tl 


Ba Re 


Been Beem Be * 


bb fo Rs fh bee pee 


Be2 fas foo hee 
[=) 
= 

-— 
pe 


es 


i, 


oes 


t 
-_ 
N 


- 


i get bes 
~ 
a 
=f) 
- 
TEC} 
: 


: 


000013 o01202 


177764 


SOR MACYL1 27(732) 14-OCT-76 10:46 PAGE @4 
TE OPS USING ADDRESS MODES 38S 
+4 
RORBS: at 
ee air My :(RO)2177000, CC=1001 
E ASLB3 
SM +4 
ASLB3: HL 
poce 9-(R2) ;(RO)2177400, CC=1000 
BM +4 
ADCES: HL 
ae a(RS)+ ;(RO)=177401, CC=0000 
BLOS ROLBS “BRANCH IF COR 2 IS SET 
EPL +4 
ROLB3: HL 
SuAB a-(R2) ;(RO)=000777, CC=1000 
HLT 
SEC 
ee a(RS)+ ; (RO)=000377, CC=0100 
. 2 
SBCB3: HLT | 
NEGB  a(R2)+ ; (RO)=000001 
a a ) 3(RO)=000000, CC=0101 
+4 
DECBS: HL 
SiTest 13, CHECK UNIARY WORD OPS USING ADDRESS MODE 6 (PC) 
ce & RERERELELLKA RSA RA RA ALLA KELELRLEKA RELA LALERELELSLRLELEE 
+6713: HOVE #13, 08STSTNM sLOAD TEST NUMBER 
CLR (PC)+ sPRESET DATA = 0 
UWM6: fir - *RESERVED FOR DATA 
-(RO),-(RO) RO POINTS TO DATA WORD 
RO UA ; (RO)=000001 , CC=0000 
: ROL 
+4 
ROL6: HL 
om ae ;(RO)=177776, CC=1001 
BVS COM6 
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4 ie 

ea He i 
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Se BB BBR ary 

3684 012176 103003 

3268S Ol ein 
1S : 1401 

a Hise IPRA 

3690 012210 000277 

369 Hee 177674 

36 1 1 

3% 1 ip 

Se ties fas 

oe Olee26 104000 

Oh lee 

3700 DiseNG on 

site 1 109000 

3708 iS 10303 177640 

ie | 

Pa tes tat 

ay Boe 14000 

es 1s Bal 

AS 

ie Hea BES 

ea oisaie ese 177600 
i 14 : 1 

ga Na ise 
piece 005567 177564 

ye ties te 

3728 Olesse {00ND 


— 





G07 
PERE LRT ESP TAAER“UNDBAY KORO ‘oPs usING ABDRESS fiooe'e toy oN PAGE 8 


COME: 


NEG6: 


INCE: 


DECE: 


D 
o 


2BR5R 


Gs 25Ra8 


2885 


5 


aes 
ooo 


a 3foa 2828 § 2 


S558 ESS88 AESBRGG ERBSES2 AVSRR ERAQNES ARREEAY ABEEBE 
: 


ADCE 
+4 


CC=1010 


;(RO)=000001, CC=0001 


cc=1001 


cc=0010 


=1011 


Cc=1010 
Cc=1001 


Cc=0011 


Cc=1010 
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000243 


001202 


ADCE: 
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SS MODE 6 


—. (RO) 


Pisa yregraneonernsrosnoresneernescssepesscccnstanseatersccere 
CHECK UNIARY BYTE OPS (EVEN/ODD) USING ADDRESS MODE & (PC) 


ATE 
tér14 


TSTBE: 






3 


#14, d8STSTNM 


SHrACTOR, RO 
UBME 


UBM6+1 
+4 





jeasnedaveaueensensegn eenseanteessteanseageeniieanteageeetteas 
;LOAD TEST NUMBER 


;RO POINTS TO ADDRESS OF DATA 
;CLEAR DATA 


; TEST ODD BYTE 


;(RO)=000000, Cc=0100 


;LOOP UNTIL (RO)=077600, CC=1011 
;INCB INST INCREMENTS EVEN BYTE 
;ADCB INCRE 


MENTS ODD BYTE 


;(RO)=077400, CC=0111 


;(RO)=100000, CC=1010 





SSL eRe eee 


2 On be be be ee me Fe ee 
OO NGU.£ Wwe 


Beene Bese 


* 


‘ 


ae) ee 


——) ——— 8 9 
B22 
~“ - 


a 


See UR SERS EUS OTROS 
ee 
Be 
c 
N 


: 
5 





Pll tiv tneck UNIBRY BYTE” 


000171 


000154 


000137 


000123 


000106 


107 
Tic bores nove’ 6 
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;(RO=140000, CC=1010 


;(RO)2140377 CC=1001° 


;(RO)=040377, CC=0001 


CC=1010 


cc=1001 


cc=0101 


Cc=1001 


Cc=1000 


CC=0111 



















tt ST mms POP 11/70 CPU EXERCISOR MACY1 ¢ (79) 14-OCT-76 10:46 PAGE 88 


DEGKCB.P11 CHECK UNIARY BYTE OPS (EVEN/ USING ADDRESS MODE 6 (PC) 
3542 1 19 140 BEQ +4 
3343 le7i2 1 ROLB6A: HLT 
3845 o12714 005767 o00012 TST UBM ;(RO)=000000, CC=0100 
38% 012720 103402 BCS TESTE 
5 Oie7e4 Apiaot = 
1 TO4000 TESTb: are ‘ 
01 90401 BR +4 sRESERVE A WORD 
01 UBM6: .WORD O ;WORD RESERVED FOR DATA 
ot 1 aot te? oe 
1 000012 ADD ATH 
01 01 034240 MOV #RELOC, PC ;GO RELOCATE PROGRAM CODE 
012750 009000 


REL11: .WORD OQ 
p1111111111111 LAST ADDRESS OF CODE TO BE RELOCATED 11111111111 
| EHBEHHBHHEHHHBHHBHHEHEHHEHHBE HEHE HHHEHEEHBEHBEHEHHE HEHE 
NG ADDRE ? 


iitesT 15 CHECK UNIARY WORD OPS USI 
° £RE HEEA SEN ELS LA KL GERLERKA LEELA SHELA EHS RHF SSE LE LEEK HELE 


he 
012752 112737 0001S oo1e02 téTIs: MOvB #15 asSTSTNM LOAD TEST 
000001 166330 Hoy 1, STIMES 3;D0 1 ITERATION 


-SBTTL START OF SECTION 2 
; 2222222220220 FIRST ADDRESS TO ee RELOCATED 222222222 


REL2: PC 
ney -(RO CONTAINS THE ADDRESS OF REL2 
001512 MOV RO, 3BFRSTAD Sve 


Boooe4 
Been 
tied my (2 onwen me 
013002 SUB Ss«#. RO ; SUBTRACT RELOCATION FACTOR 
Be Bie Sim tl 
LC ieee a ek 
& rigtsaed ISTB it ;BR IF TEST CODE TO BE EXECUTED 
1 RELE2 
BY 


3 FOR ADDRESSES & DATA 


Be Bae Ge Gee Pee Ge Gee fae Bm as Pe Fe ho fs bee 


SISNSFERERS RESTSRRISREREIAS 





RVR ERPRRCTLIS ULL LU MERENSRRRR Ga Sd cdg ca aiiltilstth 


Nig 
~ WORD * CONTAINS OF UWM7 
UWM7:  : WORD ; ; CONTAINS DATA 
“WORD >CONTAINS ADDRESS OF UWM7 
01 10700 UW7: MOV PC, RO 
ao ies ee 
1 Hie ctr =18} CLEAR TEST DATA 
1 1 MOV R2.-(RO) ;SET UP ADDRESS 
1 TST (RO)¢ ;MOVE RO TO NEXT ADDRESS 
t 1 Vv Re, (ROD ;SET NEXT ADDRESS , 
! ° 1 MOV —s- Re, RO SET RO POINTING TO DATA 
13102 oo0244 as 


| 
| 





DeOkes.PLL START OF 


ooo 
boo R= bo 
w 
Roe 
be 


1 140 
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WWW) Wt) 


ee a 


—s = FD Pom pe ee 


WWWWW 


ae 


BEESRES BRVVET 


Cs ee es 


3 FIBSLH 


Oooo00eo O000 00 oO 
> bm bes bn po fee 


385 
pas 


a GEG Lee 


ees Gat Pa 


-_ 


LURES ESE ESC CMM e Ns piss eee eee Ce 


i Dea Sa) es Rees 


Se See me ee 


& 
a 


! 
| 
| 
| 
\ 


ee aes 


o0000e 


177776 


177776 


177776 


UE 


177776 


JUUUUE 


1/70 CPU 
SECTION 


peism 


ASL?: 


DEC7: 


NEG?: 


MACYL1 27(732) 


S Pisses MBs 


<> 
oa 
oOo 


SEV 
ASR 
BCC 
BVS 
BMI 
HLT 
CLC 
SEV 
ROR 
BLOS 
BVS 
a 
= 
BCC 
a 
HL 
CLN 
SWAB 
a 
HL 
SEV 
COM 
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a2(2) ;(RO)=000500, CC=0100 
a-2(2) ;{R0)=177777, CC=1C01 
SBC7 
SBC7 
+4 
922) ;(RO)=177776, CC=100 
8E.5 ' 
ASL? 
+4 
92(2) ;(RO)=177775, CC=1000 
bec ’ 
DEC7 
+4 
a- (2) ;(RO)=177776, CC=1001 
ASR7 
+4 
a (2) ;(RO)=077777, CC= 

7 : H IF 
ROR? *BRANCH IF C’OR 2 IS SET 
+4 
922) ;(RO)=100001, CC=1001 
NEG 
NEG? 
+4 
a-2(2) ;(RO)=000600, CC=1000 
+4 
a2(2) ;(RO)2177177, CC=1001 





ee ett st P 
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Serre P RP SPR enti LER eRERERRRR I Gt aoM tasty 
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Spomsssees § © Raaeee 


a ee en a ee ry 
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a 
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pm ee 
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1/70 CPU EXERCISOR MACYLL 27(732) 14-OCT-76 10:46 PAGE 90 
SECTION 
Bcc COM7 
BVS COM? 
BMI +4 
COM7: HLT 
ooooc2 SuaB 92(2) ;(RO)=077776, CC=1000 
+4 
aT 
itd 77777 
177776 9-212) ;(RO)=0 , eC=0000 
eve OE? 
BPL +4 
ADC7: HLT 
oocon2 INC a2(2) ;(RO)=100000, CC=1010 
BVC INC? 
BMI +4 
INC7: HLT 
ccc 
177776 ROL a-2(2) ;(RO)=000000, CC=0111 
BCC ROL? 
pvc ROL? ‘ 
7: FET 
: peer le CHECK UNIARY BYTE OPS USING ADDRESS MODE 
:&TE CK UNIARY BYTE OPS USING S ? 
eases teasuenutagiesneeanusanessteantesnesseenstesteesseueneats 
000016 001202 jit? HOVE #16, a8STSTNM ;LOAD TEST NUMBER 
013050 MOV RO 
001506 ADD #FACTOR, RO 
MOV »Re 
177450 HOV MIN? +2 
iit PRO) T oe Nao PO TINTS 10. DATA Rone 
i a) ge 000 Br BATA” 
177430 RO, UWM?-2 
NOTE: ete) REFERENCES THE ODD BYTE, AND 2-2(2) REFERENCES THE EVEN BYTE. 
+SEC!SEV ;SET C AND V 
ooco02 SBCB (2) (RO)=177400, CC=1001 
BCC S 
oaca? 
BHI +4 
SBCB7: HL 
C ATION c 
177776 Boe 9-2(2) 6. Rite 
BCS 8 


Bea ACE? 





Qo 
wi 
Stes 
bose 


a He 


22 
an 


a en be he pe pe ss 


Race fens 


gcecaaseacanacass tasseasasccesanceceseansanemscccescces Fe 


ee eee ee 


Be RkEsom Seon Senne Kase Boaee & 


will 


-B POP 1 CPU EXERCI MACY11 27(732) 14-OCT-76 10:46 PAGE 91 
Tl bee ONIBAY gteer OPS USING bokess MODE 7 
100001 BPL +4 
104000 ADCB7: HLT 
1 177776 OMB a-2(8) :(RO)2177776, CC=1001 
! C OMB 
V €OMB7 
100401 SMI 4 
104000 COMB7: HLT 
L sCLEAR CARRY 

se oooo02 ee 922) TR scoereoe, cC=0011 
103002 ORS7 
192001 Bye R87 
18400 RORB?: HL 
105272 oo0002 INCB = 922) ;(RO)=100376, CC=1011 
103002 BCC INCE? 
192001 pvc NCB? 
154000 INCB7: HL 
105372 177776 cB a-2(2) ;(RO)=100375, CC=1001 
10300¢ Bcc DECB 
102401 BVS DECB7 
100401 BM +4 
104000 DECB?: HL 
106378 oooo0e2 ASLB a2(2) ;(RO)=000375, CC=0111 
1 BCC ASLB7 
igh Ba 
tO4000 ASLB7: HLT ; 
00024 cLe CLEAR CARRY 
1 177776 ASRB 9-22) ;(RO)=000376, ¢°=1001 
1 BCC ackap 
1po4ot Ent sy 
1o4000 ASRB7: HL 
105472 NEGB a2(2) ;(RO)=000376, CC=0100 
1 BCS NEGB? 

02401 BVS NEGB? 

140 BE +4 
i NEGB7: HL 
000262 SEV 
106172 177776 ROLB 9-2(2) ;(RO)=00374, CC=1001 
1os0ce BCC ROLB 
eat aoa 
1 ROL87: HL a 
1 1 NC -2(2) : (RO) 1001 
12595 tee INE §-5(5} t RO» s000376" sete 


: 









C=11-DEQKC-B POP 11/70 CPU EXERCISOR Y (732) J 0CT-7% 10: 
“PL T16 HECK UNIARY BYTE OPS USING AdDRESS MODE fone! FA tan 






013634 105572 177776 ALCB 8 d@-2'2) 3 (RO) =000377, ¢¢=1000 
? 013640 1 177776 COMB Ni ;(RO)=000000, CC=0100 
T3e4e 1040 HL 


HL 

5 RRRRERE RELA AEE REAR EERE EEEE EERE EERE ERE EERE SEER EERE AE EEE EE 

iETEST 17 CHECK BINARY OPS USING ADDRESS MODE 0 
ve si oat ie eer een 


A 5054 oo0017 oo1ece #&T17: Nove 817, d8STSTNM sLOAD TEST 


SCC ;SET CONDITION CODES 
MOV PC, RO *RO=PC, CC=x001 
10305 BCC MOvO 


agegeg 53 





RO, Re erry 
Hae : SUB RO, Re ;Re=000000, CC=0100 


| 1 

00140 BEQ 
1o4000 SUBO: 4HLT 
;R2=R3=000000, Cc=0100 
MOVOA: HLT 


ccc 
+SEV! SEN ;SET V 8 N 
CMP Re, R3 ;Re=R3=000000, CC=1100 


Seasaiueed Se eRR ERE BIS IaAS SS 





Sa) ESS SS Sees mo 
a 
: 


eh hehe ee ee 












S 
4] BV CMPO 
rf TODBt BPE 
4103 104000 CMPO: HL 
4104 
4105 1 MOV Re ; 
4108 1 MOV R2,R3 *RO=RO=R3 
4] ADD Re, Ra +R3=2%RO 
4108 006302 ASL :R2=e#RO 
uly Give tata , to 
au 1 HL ; ERROR! CHECK ADD INSTRUCTION 
4113 OLLOWING SUBTEST SHIFTS A BIT THROUGH R2 AND RS AND DOES A 
4118 * tT TL i USING R2 AND RS. 
uiie OLa7ed Speeds RS 
4117 Ol o00402 
4118 O1 
4} 1 i 
4] 1 1 
4121 013776 000277 












DEOKCS.P1l 


ee 


ch ieee 


Boo ELLLESE LES 


SINSRe RERDRHEES SRGREND RBS 


QOOoOo00O 2000000 


0 oh = bh be ek ee ee ee ee or oy G2 = P< & = po ps 


Poe Pe 

a 

REGS 
2000 O0O0CO0O00O GC80O00O000000 oO 
~- 


4158 

4159 0141 
4160 0141 
416 41 
41 itis 
4163 01411 
4164 014114 
41 141 16 
4} 141 
416. 14le2 
4168 0141 
ui83 141 
41 141 


4171 O14132 
4172 O141 
4173 0141 
4174 O14] 
ui7? 141 
4] 14144 
4177 Ol14146 





MAINDEC-11-DEQKC-8 POP 11/70 CPL EXERCISOR 
CHECK BINARY OP 


11? 


~”- 
8 
3 
—s 


~~ 
o- 
~ 


2H 
B8 


2 


ae bs 


bebe 
Ss 
= 


38 
a5 
= 


oss 


es 
Be 
wea gs 


4 
t 
' 


BIS0: 


BICO: 


BISOA: 


MACY! } 
USING ADDRES 


<O© 
MOWODW 


sBanestgenesuanness Cbdgnss CBmascnes om 


SBBBS? 33 38 


s 
3 


@mw zx) 
SS 


,B278278 42eEz 
22 2 


B22B 
B 2 


és 
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;Re=kS 







iRae177777 
;SET C 


;R4=100000 
3R32177777,R4=077777, CC=0011 


MSINDEC-11-DEQKC-8 FOP 11/70 CPU EXERCI 
CK BINARY OP 


DEQKCS. Pil 
4178 O141 
aig iytes 
4180 O14] 
4181 O14! 
4is> O141 
4183 0141 
4184 
4185 
ui 
4} 
ates Stat 
“18 i 
419 teed 
4] 

4194 
4] 
41 
4} 
4198 
4199 


f 





SONS SSIS NS a SIS 





= 8 op ee 


peng wegen t end mn nt et et et et ett ee ttt tt ee 


SSEGAES SGSMRGS GUADTENS GGCiCGRACS 


ray 
= 


Tl? 


19700 


: 





- = 
im 


1 


Tosoud 
basoen 
2 
ae 


m~ 


ry 
£wW 


z 
~ 
Lf) 
=~ 
£ 


oe 
a 


ie 6s 


: 


a aly 


000010 


SOR 
S US 


ADDO: 


MACY1} 27(732) 
ING ADDRESS MODE 0 


HLT 


RS 
“+0 


F4 
~wD 
+O 


(RO)+ 


+3 
3 


= 


Bex 
B28 


83S 
2e3 


+ 


CO 
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CMPOA: HL 
gs SSSLFALEREHERFS ELS SERS RSLERELERSSSVESERS PERSE SLELFTAHSFSLHLKSES 
TEST 20 C ING ADDRE 

co SSEPEELERSSESSEF SLE LES SSSISSSSEFERELELLERA LA RES SEREA SASL ERASE S LE 
poco20 oo1202 tér20: aeSTSTNM 


BITTI: 


SSsane Clauses CBSSS8z9 Bemdeeetes 


3 © 


Sn2e * Bis 


2 


sBBB 38 BPP? 


$3238 
2 





;LOAD TEST NUMBER 


sRE 
RECERVED FOR SOURCE DATA 
;RESERVED FOR DESTINATION DATA 


;R4 POINTS TO DESTINATION DATA 
3R3 POINTS TO SOUCE DATA 


3 (R3)2177777 
; (R4¥)=000001 


;SET V 
; (R3)=177777, (R4)=000000, CC=0101 


; (R3)2177777, (R4¥)=000000, CC=1000 


;(R3)2177777, (R4)=000000, CC=0101 


: 12177777 
;(R3)=177777, (R4)=000000, Cc=0100 
; (R3)=(R4)=000377 
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DO8 


32) 
1 


7 
(R3), (RY) 


+4 


( 


MODE 


2? 


11 
Ss 


MACY 
USING ADDRES 


cga0r 


“8 POP 11/70 CPU EXER 
Ted beck BINARY 


C=-11-DEQKC 


-Pil 


DeaKes 


» (R4)2177400 
: (R3)=000377, (R4)=177777, CC=1001 


; (R3)=000377 


sSET C BV 


V—_ 
zx munw 


ll 
> 
rr) 


ciety Coo 


open 


ad 8 OG 9 8 4 4 md Od Od 9 
Q0000000 


, (R4)=177400, Cc=0001 


v 


)= 


; (R3)=000377, (R4)=177400, CC=1001 
R3 


; (R3)=000000 


; SET 
3( 
(R3) 


BIS1: 
BIC!: 





R4)=177777, CC=1011 


—_ 
eo 
~ 


rere 


a ee ee ee 


dseiaseks 


MAO T TT 
en bom bean] 


Spans 


at") 
ws] 


fn hem nem hem bem) 


eoevegeset 


OF nd dd wd Od wh oe 
Qo0OMO000000 


ECE LECCE CLUB LULU TM LOTT a 





; (R3)=100000, (R4)=100000, CC=1000 


MOV —s- (RB), (RD 
BEQ MOV 


SUBiA 


1 


011314 


001 


a1 


MAINDEC-11-DEQKC-B POP 11/70 CPL EXERCISOR 
pexesPil Teo 
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MODE 


HECK BINARY OPS USING ADDRE 


hee 


a 


1 
1 
1 





(RZ), (RY) ; (R3)=100000, (R4)=000000, CC=0111 


(R3) ;(R3)= 

(R3), (RY) s(R4)= 

(Ra) (RY) : (R3)=077777, (R4)=177776, CC=1010 
ADD 1B 

+4 

#2, (R4) 

(Ra) sCHECK FINAL RESULT 


HL 
Fh} 5th talelabalahalad-tyt-}-triat-t-teh-t-tvlah-tettntaht-t-labet tbat b-4-4-5 5 tealat fleet 


USING ADDRESS MODE 1 


Wie MOVE eel oasis ow inet eee 


oo0021 001202 juste 





55 


Bs 


SQGRRESR ARZERIRSY aw 


Oe ee ee ee 


2222 2G RC RRSB RCN ORR IBRe RSC e TS 
RORSEIFE GSGEIISSE GRAMGRAITESE 


821, 8STSTNM sLOAD TEST 
+6 

5 

PC, RS 

“fs} ‘aac 

RS, Re 

-( Re) 


ine Pointe TO ODD BYTE 


3 


(Re) (RS) ; (R2)=177400, (RS)=000377, CC=1001 
NOVEL 

MOVB1 

MOVB1 

(RS) ;CHECK RESULT 

+4 

(Re) sSHIFT (R2) UNTIL 

"2 * (R2)=000000 

(Re) + RS)=1 00000 

(RS) + (RS)=00377 

(RS) : (RS)=000177 

(RS), (R2) ;(RS5)=000177, (R2)=100000, cC=1010 
cMPB} 











NAINDEC-11-DEQKC 


DEQKCB.P1l 
Bivese 
14634 


Re 
44 


LL Rinne Seo 


PRE RRRE 


Pe 

fd 
oo oe0O0oO 
phe Gas b=2 bs pee 


4367 ithe 


Bie! f 


uw 
pee 
Tm 
~ 
wi 


8 
S 


Rs he 
ure 


eae peepee 
rT 
-“ 
fr 
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T4000 





POP 11/ 
Tel 


70 CPU EXERCISOR MACY11 27(732) 
CHECK BINARY BYTE OPS USING ADDRESS MODE | 
BM +4 
CMPB1: HL 
ee R3 
R 
SIS 3 (RS) 
sSEC!SEV!SEN 
git (RO), (RS) 
BITal 
BS Brel 
BITB1: HL . 
BISB (R2), (RS) 
Bcc Bisel 
BMI +4 
BISB1: HLT 
I (R2), (RS) 
gies Bical 
BEQ BICB1 
BPL +4 
BICB1: HLT 
COMB 3s«(R2) 
CMPB 3s (Re), (RS) 
BEG +4 
HL 
BICB (RS), (Re) 
BN picela 
5 (Re) 
BEQ +4 
BICBIA: HLT 
BR 5° 
iio PC, RS 
TST -(RS) 
ar URS RY 
CLRB Os = (RY) 
MOV R4,R3 
CLRB = = (R3) 
MOV R3, Re 
CLRB = (Re) 


14-OCT-76 10:46 PAGE 97 


re 
lodooo, (RS)=100177, CC=0101 


; (R2)=100000, (RS)=100377, CC=1001 


; (R2)=100000, (RS)=100177, CC=0001 


; (R2)=077400, (RS)=100177 


;(RS)=100177, (R2)=000000, CC=0100 


; RESERVE Me WORDS FOR DATA 


. 3DEST DATA 


' 3RS POINTS TO DEST ODD BYTE 


sR4 POINTS TO DEST EVEN BYTE 

;R3 POINTS TO SOURCE ODD BYTE 

;R2 POINTS TO SOURCE EVEN BYTE i 
POINTED TO BY R2,R3 ay 

CARRY 


FEEL LEM TH PTR, 


(R2) 
(RS), cRYD 
(Re) 





I 
RY 


— 


(R3) 
1 


0101 


0000 


;LOAD TEST NUMBER 


0000, CC=1001 


+1010 


de 


oo 
te 
oo 
md ey 

~_o« 
ae 
[= l=} 
ee 
oo 

-« 
Cn | 
oo 
woe 
oo 

-~ * 
od oe 

“ee 


;01 
;01 


3 (R2)=177777, (RS)=000000, CC=0101 


;SET DESTINATION REGISTER 


se] Vv 
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GO8 


oar PS Satara tatatad 


COO ee eee ee ee eee 


parr net ert et — perth = petted — tert betes 


Eero aria isis fe tice 


o- 
— — 
enna 
—— 


- 
~ 
~~ 
— 


CHECK BINARY WORD OPS USING ADDRESS MODE 2 & 4 


LLELLLLLLELLLLALLAL LLLLLLLLASELAAAA EAE LAARLLALA LAL ALA LALA ELERE 


#22, 08STSTNM 


SSEBSOEERRISHEED 


titza: 


oood22 ool2ce ft 


BINI: 


ss LELELLLLELELELALLLE LALA LLL LE LEELA LALLA LLLELALLELLLLLLELELELAEEE 


CHECK BINARY vie OPS US 


pA va ete ol en | 7° mz, MmniNnCrus tuLnLn mae 
Ce oe 
mo wee | Smouusos 


pa ee a 7 = =e 


ATMEEaDUATINN pyesmene 


7,27, 2,2, FRAO DRONA A AAA Aah Oo a Od ad dd ad wd ed OH 
2OQO00000000000000000000000000000 QOOKOOOOO08OO0O000000 


oD PPODPEEESTETEE SE IEOPD POND EETTT EIDE 


POP 11/70 CPU EXERCISOR 


penal 
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HO8 
c 732) _14-OCT 


MACY11 27 
DRESS MODE 2 38 4 
CMP2: HLT 


XERCISOR 
CHECK BINARY WORD OPS USING AD 


104000 


Tee 


015156 


MSINDEC-11-DEQKC-B POP 11/70 CPU E 


DEQKCB.P11 





;(R2)2177777, (RS)2000000, CC=0100 


3 
é 
k 
: 


eo i me 
Gkarncumaks Sindasesas 


; (R2)=000001,(RS)=177776, CC=1001 


ee: Lae 
eee Ee 


pan oem bem bom hem bee hem bas bam dam bon, dition ham bee koe hoe hee bee ee en) 
20000000000 2000000000 


Py 


; (R2J=1252Se, (RS)=052S25, Cc=0101 
; (R2)=1eSeSe, (RS)=177777, CC=1001 


» 7 (RS) 


-(R2) 


BIS2A: 


euSeS 
Staseiae 
Saba 


Ce es toe Ree ae en ee eo 
OooA00N00000 


PELETETTEST ESS ESR EStTae teeta tee eee ete e UROU TST SDIES 


oOo 
8 
a 
iT] 
8 2 
ou Re. 
m KR & 
oy eer s 
wu “uu oOo 
a Or 
ww YY ty 
— Sr uw 
eee eace on 
~- 
— ~~ 
YT # 
Bex + va u 
na na | a 
aw i wwe Bin Qa 


HOE 


bbc Goins 


aco iT Se ee Keen ee Ron Reece io 
Q0000 280000000 








MQINDEC-11-DEQKC-8 PDP 11/70 CPU EXERCISOR MACY11 27(732) 14-OCT-76 10:46 PAGE 100 
DEORE Pi Te2 HECK BY Ney WORD OPS USING SS MODE 2 8 4 
4514 015330 010205 MOV R2,RS sMOVE TO RS 
zie ne eveNs 1S: CHP (Re) ,-(RS) :COMPARE ALL PREVIOUS MEMORY ADDRESSES 
17 Ol ei HL ' ERROR! 
32 te 001512 CMP R2, J#FRSTAD *CHECK FOR LOW LIMIT 
4519 015344 001372 BNE 1§ 
$5 SREFSLSLSLEERLKE RELA KA LE LSS ERAS ELSE SESE ES SEEKS HERSELF RSS E SASSER 
uest TEST 23 CHECK BINARY BYTE OPS USING ADDRESS MODE 2 & 4 
d2s5 ©  EEKKEEKELERA ELE LEAL LALA EALEAE RARE EL ALLA AA ASR AKA LS HEAAS ELA RKELLEEE 
015346 12737 000023 ool202 fST23: Nove #23, J8STSTNM sLOAD TEST NUMBER 
4 SE . 3R 
= iss Som 6 eee ng ws 
ween pleses nov «PCR en ne 
4529 015366 005743 TST -(R3) 
4530 
4531 sFIRST CHECK AUTO INCREMENT/DECREMENT 
tose 15370 910309 MOV R3, RO 
15372 010002 MOV RO, Re 
4534 015374 005302 DEC Re 
4535 01 010604 MOV »RY 
436 01 10605 MOV SP’RS 
01 005745 TST =(RS) 
aoa 015404 114046 MOVE  -(RO),-(SP) 
4540 OL 020506 CMP RS, SP 
4541 01541 1021 BNE BING 
“S42 (01541 g20200 CMP Re 
ea Bleue Dee Be lls «srs 
454s ieuep GSoNoe CMP R4, SP” 
oo fleas Bias jaa. 
1 C R3 
4548 01 101 BNE BINB 
es fine pee bee gear 
1 CMP RS, SP 
4gs ieee 1007 BNE BI 
ues 1 
WSs 1 0100 BNE BIB 
1s442 1 BICB (SP)+,(RO)+ 
4555 1a CMP RY, SP 
1 MP 
‘ = ne 1 BINB z sa 
Weer Bienes Siooas (ROD, 
ieee BiBHeN bt 3 Spas? nove 8 21th) ; (R3)=100377 
4564 015472 11 000177 MOVB #177, -(R4) 
1 Sad 000000 MOVB Hi -tr4) ; (R4)=077400 
ieeos | 04 Be 
4568 
4569 O15506 152324 BISB 


(R3)+, (RY) + ; (R3)=100377, (R4)=077777 





ee ee - = 








DE 


a23 & 





Gene an foe Das ae 





SaesaaeeRRSEREB IIIa 


GiRRiiecessassananasnccaccsss 





Gat bh Fe Ce oe ee ee ee ee ae Bee De b= ba bt oe pas hs ht fe fn pe eo ee be fh bo fee 


Ei 


| 


Bee 


Be 
~ 


sia Soke 


15S1 
1S51 


4 


: 


i 


4 
rie 
= 


PELE RSRCROR URNS cRE RRBs sooo 


10040 


a 


a 


om“ 
8 
5 
——s 


z 


8 
2 


a 


BE 
=F: 


e an 
- 
oo 


: 


BR 


ET oeaKc POP 11/70 CPU EXE 
Pil Te3 


MACY] 


CHECK BINARY ’ e* OPS USING 


CMPB2: 


BITB2: 


tkTE 
ooon24 ooizc2 téT2y 


: 





BICB 
BEQ 





27(732) 1s-ocT- -76 10:46 PAGE 101 
SS MODE 2 8 4 
+4 
Fas (NDS 


-+4 


web iia ; (R3)=100377, (R4)=077400 


HLT 
piecetecscesenoveeneverecsncnvessecscuavestsssszescosesscenetaes 
BINARY WORD OPS USING 
eared neaeeneeassenpensveaneeneees ceaeregteag fea tregeareeates 


HOVE #24, J8STSTNM sLOAD TEST 
BR TA AND ADDRESSES 
. WORD 5s i ORTAIA Soe e SOURCE DATA 
-WORD O sCONTAINS ADDRESS OF DEST DATA 
oR OO Aol he 
“ * CONTA ST 
HOV Ri’ RO T PTR 
CMP -(RO),-(RO) HADNT RD 
MOV RO,RS ; INTS TO DEST DATA 
CMP -(RS) .-(RS) >SUB 4 FROM RS 
ay RO, Rs RS POINTS TO ADDRESS OF DEST DATA 
NOV RO: 3R4 POINTS TO DEST DATA 
MOV R3 DATA 
MOV *=(Re) if bp POINTS 10. 18 RODRESS OF SOURCE DATA 
CLR (R3) > PRESE 
CLR (R4) : PRESET best Bi Bara” 
as 
SUB aig sass ;(R3)=000000, (R4)=000000, C¢=0100 
Be RE 
HLT 
BIS #100000,9-(R2) ;(R3)=100000 

Hi 5h cs Rad 21 (R4)=100001, CC=1011 

g ; o = s 

BC SUB3A : ; 












KO8 
DEOKCE.PLL" Te¥. CHECK BINARY HORD ‘OPS USING ADDRESS RoDed ‘srg ° TONE PAGE 102 


Rb 


= 


ae i 


conraaeree 
See 


Bs8 


Pat faa Pe 


a Ob — O— b— 0 0 & = bp ph ph pb pe —s 


BR BPckSRERGSAS SIRETIMES Sen BUND 
+ =F s 


SMVRMVRUMAE AA SIRE MIATA AAs a SESS tsedtnte teats 





be he ee ba BR hee Re pe 


BvC SUB3A 
BMI +4 
SUBSA: HLT 
RY) 3( Foy (LAA 
byt a= (Re) 2-<S) {RAS 00000, (R4)=077777 
HL . 
EVs a(R2)+,9(RS)+ 
+4 
HL 
COM a-(R2) 
nS (R2)+,a-(RS) 
eve | ADDS 
BMI +4 
ADD3: I 


¢ 9° (R) ,(RS)+ ; (R3)=077777, (R4)=100000 
er 1¢3 
BIC3: HL 4 

(RS 


COM ) 3 (R4) 2077777 
eae ache) +, acRs)+ 3 (R3)2077777, (R4)2077777 


; ns JHHHMHHHHHHHHHHHHHHHHEAHHEHHHHHHEHHHHHEHHEHHHHHHHHEEHHEE 
titest es CHECK BINARY B BYTE OPS USING ADDRESS ROORESS ROOES 3 3 Rie ." 
[HHEGHEHHEIGEEIHEEHE HEHEHE 


tét25: move #25, deSTSTNM ee TEST NUMBER 
BR. : 5 
WORD "Dare (EVEN VEN BYTE) 
; ce ODD BYTE) 
. oe mT ° N BYTE) 
. TA (OOD BYTE) 
WORD :CONTA 
WORD all Bi DEST 

: MOV PC,RO 

8 CHP -(RO),-(RO? iAgeAOORESS OF DEST DATA 
eis 6s 
HOY RO,=(R3) ‘e 8 FROM #3 TO ADDRESS OF DEST DATA 
nov : v=(RQ) EVEN 
TST -(RO) oF Ss DATA 
MOV RO, =(R4) if " PO DiNTe To aBORE RES OF SOURCE DATA 
INC (R4) * ODD BYTE 
MOV RO, -(R4) * EVEN 
pad ;SET CARRY 

#177001, 3(R4)+ 














SSGt 5: 


4719 


GRRIERE SSS VNB Seats 

~ 
OVOOOOOOOOOOOOO00000O 20000 
P= oh AO BH Fa = pe babe he he ee oe oo 












M3INDEC-11-DEGKC-8 POP 11/70 CPU EXERC! 
DEQKCB. Pil Tes CHECK BINARY BY 


! 53 009200 
1 ! 

I 

: 000600 
16 

if 

] 

1 

i 100601 
1 





bier Bibs 


DiI 016136 


CPOKMKN COrwc 
ee ee el ee eee 
See SRNR ONSREGe Es KREV8R 





OPS USING ADDRESS MODES 3 
MO #200, 3(R4)+ ;SOURCE DATA=100001 
MO 9° (RH), g(R3)¢ 
nove o-(R4), (R3)+ DEST DATA=000600 
HL F sERROR! MOV ES AFFECT C BIT IN PSH 
chp #600, (RS) ‘CHECK DEST 
HL : ; spanont INCORRECT RESULT 
fis =(R3) oD), INT R4 BACK TO EVEN BYTE 
I EMRE TT )+  ;DEST a78=100601 
chp #100601 , (RS) CHECK RESULT 
HL ‘ sERROR! INCORRECT DEST DATA AFTER BISB 
I i) Sa) 
Ic -(R4) , a-(R3) 
IT (R4)+, a(R3)+ 
1783 
BITB = (RH) OCR) 


BITBS: 


MACY11 


ait peeet rs 
fATEST 26 


sEdeadhecquasatetiael tocasetatettrotecthetthocrtiolsuccemneanen 
tét26: move #26, J8STSTNM ;LOAD TEST NUMBER 

BR” . +6 : TWO LOCATI 
SDATA: . WORD 6 RE FOR SOURCE DATA 
DDATA: . >RE FOR DESTINATION DATA 


18: 





SSeS aaeasces 






@(R4)+,a-(R3) 
+4 





EEE RERE EERE ERE EEA EEE EEE EE EE EERE EE RERE REELS 
OPS USING ADDRESS MODE 6 





DeFACTOR, Re ;GET RELOCATION FACTOR AND USE AS AN 
FRc sINOEX VALU TOW Da ra aris 
TAC INAT 
#1,SDh a(2) THIS ROUTSINE PUT A 0 EVERY 
TAC } > asi ;OTHER BIT Post Ton. nN THE DEST- 
Tate)" ;INATION ADDRESS (52525) 
TA(2) 
,DDATA(S) ;CHECK RESULT 
ve ;ERROR! INCORRECT RESULT 
git soara‘e) ;SOURCE DATA=125252 
TACs ) *Boatace, 


FRRORS BET ENST FAILED 


SDATACE), ppatacs! 











Mal 


DEQKCB.P1l 


Bm be Be Re he te pe OB ps ps De en or ee oe 


OOOO OOOOOOOOO0O0O000 O0000 G2O0O0”H 
ELEANOR CEES 
£ 


BRR 


3 
oe 


aoe ayers 


en hn 0 he be 


ao. 


Boe oe =) 
oo oOoOooOo 
as 
Co 


| 


C-11-DEQKC-8 FOP 


"BAO BINARY 


16008 016134 016136 
14000 


Teesee 16134 016136 
03401 


016136 


016136 


016136 


016136 





001202 


oe 

bbboeM 

hte £01506 

7 

is7e3 97188 
te 


016570 


aE 
ES 


016572 


OR 


MACY 


oreee. 14-OCT-76 10:46 PAGE 104 


USING ADDRESS MODE 
HLT ERROR! CMP INST FAILED 
ADD SDATA(2) , DDATA(S) 
hm 
ADDE: art 
A ATA(2) -SDATA=S2524 
cB Spa TAtS),DDATACS! 
et 
SUBE: 4HL ; 
#377, RO ;R0=177777 (MOVB “R EXTENDS SIGN) 
une 
iro gatas), 
1S Bb areree ),DDATA(S) 
j aay SDATACE)" 
COM SDATACe) 
IT SDATA(2) , DDATA(S) 
9 +4 
HL 
COM SpaTAg) 
CMP SDATA(e) ,DDATA(S) 
BEQ +4 
HLT 
cH TAC2),RO 
reir iiiiiiiiitiiiieitiiii cei ser ets RERAARALALKKERE 
TEST 27 CHECK BINARY BYTE OPS USING ADDRESS MODE 6 
o  £EREE SAAAKELAASERARA LARS LA LALA RATE LE RARE RLRALAREAAE 
+127: #27, deSTSTin" sLOAD TEST NUMBER 


NOTE: 


os 


: T 
;AND SDATAB(3 


BITE: 


AND DDATHA(4) REFERENCE EVEN BYTE OF SOURCE 8 DEST DATA 


) 
), AND DDATAB(S) FEFERENCE ODD BYTE OF SOURCE * DEST DATA 


SEF ACTOR Re ee MOEN RCE EVEN I RY FOR 
RY,R3 *DEST BY FOR SOURCE EVEN 
R3 - AND RS FOR DEST BYTE 
’ ;SET CARRY 
#1 i (2) 
8177125 (3) ; E DATA = OS26S2 
SDATAB(2) . DOATAB(4) 
> ies (4) sDEST DATA = 177777 
SDATAB(2) , SDATAB(3) 
SDATAB(2) , DDATAB(4) 





may thes POP 11/70 CPU EXERCISOR MACY1} Ae a 


14-OCT-76 10:46 PAGE 105 
QKCB.Pil Te? CHECK BINARY BYTE OPS USING ADDRESS 6 


i ERROR MOV,BIS,BI1T;BIC 00 NOT AFFECT ’C’ 


oad Bites? 1Beae8 016570 016572 toe SDATAB(3) ,ODATABTSY) 
47% O16 1401 BEQ +4 
nied 016532 104000 HLT 
1 1 16 1657 Ic (3) ,ODATAB(S) 
733 LES I2ests Bigess bles? ere Spares 2); pat ABE) 
4801 O01 B40 BEQ 
16552 1 HLT 
4804 016554 136564 016572 016572 BITB DDATAB(S),DDATABC4) 
4805 016562 00140 BEG +4 
ueG? Of BR 
4 1 1 _ BR UB7 ;RESERVE TWO WORDS 
4g08 1 9000 SDATAB: .WORD ‘RESERVED FOR SOURCE DATA 
4803 1 DDATAB: .WORD *RESERVED FOR DEST DATA 
uet : prec an CHECK BINARY WOR FRRERAAAEAALRELEREREE we? 
48] j ATEST 30 CHECK BINARY WORD OPS USING ADDRESS MODE 7 
481 SS OF SOURCE DATA, AND R3= ADDRESS OF DEST DATA 
4814 | deaeenesneseeatenessieeaeeatenels KERKAREA SRA RARALLELALEAERALESEE 
uB16 Dies? 12737 000030 ool2ce téT20: #30, 28STSTNM ;LOAD TEST NUMBER 
ueie th SBIN?: ;CONTAINS ADDRESS OF SOURCE ‘pata 
4818 1 DBIN7: <WORD CONTAINS ADDRESS OF DEST DATA 
4819 016610 000000 WORD *CONTAINS SOURCE DATA 
“B20 82 016612 000000 “WORD CONTAINS DEST DATA 
916614 010700 UB7: MOV PC, RO 
16616 CMP -(RO) ,-(RO) 
4Be4 O1 1 . MOV RO, Re 
4825 Olbbe2 24 CMP -(R2),-(R2) 
ugeb 16624 O100le - MOV RO, (Re) 
16606 1 MOV R2;R3 
4 1 CMP -(RO),-(R3) 
4 16632 01001 MOV RO, (R3) 
4B3 16634 SEC 
1 1 190009 177740 MOV #100000, 9SBIN7 ;SOURCE DATA = 100000 
16644 O1 177734 177734 MOV OSBIN7 , OOBIN? ‘DEST DATA = 100000 
4834 016652 103001 BCC MO 
4B3S 016654 10040 BM +4 
co bie met 
1 177722 ASL QDBIN7 DEST DATA = 000000 
4838 16664 ide001 BVC +4 
4 16666 001401 BEQ * +4 
Heo 016670 104000 HLT 
upae ‘ O1bb7e 027777 177706 177706 CMP QSBIN7,3DBIN?  ;(R2)=100000, (R3)=000000 
4843 Dib? 103402 BCs 
4e44 16706 iGeadt BV Ne? 
Hed Beep 1oh000 CMP7: HL 
HeN8 016710 167777. 177670 177670 SUB QSBIN7,3DBIN?  ;(R2)=100000, (R3)=100000 
016716 103003 BCC SUB7 


ae 


; (R2)=140000, (831=040000 
OPERATIONS INVOLVING THE PC 


; (R2)=140000, (R3)=000000 


; (R2)=140000 
; (R2)=140000, (R3)=140000 


BOS 
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» @OBIN7 


» SOBIN7 
, WOBIN7 
» @DBIN7 


7 


(732) 

SS MODE 7 
7? 
7 


SU87 
+4 
aS8IN7 
aS81N7 
+4 
aSBIN7 
+4 
JSBIN7 
+4 
aSBIN7 
+4 


AD 


Adoke 


. 


¢ 
Hi 
? 


s KLELLELELLSELESESLLELLA SELLE SLE LLLSLALLALLLELELALELELLLSLALEELE 


MACY 
D OPS USING 
BvC 
BE9 
SUE? : at 
ASR 
Q 
HLT 
BI 
eT 
HL 
MP 


OR 
ADD7: 


vekk BINARY HOR 


177624 =177624 


= ae 

177650 

177644 = 177644 
Bgi%0t 


16764 1 
16766 :77612 177612 
Tee nal 


16776 104000 


wa 
16762 


C=11-DEOKC 


-Pil 


‘a 





MOVB 


T31: 


o00031 ooiec2 f§ 


g ewiiedeel® 





2 
s 
2 


S 
ts 9 
3 
2 
" 


PROGRAM 
INST ¢ 
, TO 
;RETURNS 
;BRANCH OVER i$ 


wesy 
a ace 
i 
yea. 
SS BUSS ee 
#2 a*222 
Ss Fess ee 


-» 
a 
Yo 


Hien fetataba anti 


Gee BED 


PEERERERRREEEEEE = BRRERcEeee 


popapatotatatotatatatetetetarate] en han pat bam bam bam beeen) 





SSAGSDSTSSEIGEA ANE SSSOSSSE INSU IDESNSESO ETS 


nn = ee nn a me et 





~~“ 


a a 


- 
~“ 


NNNNN 
(alt aeleniael 


IN rm bet H 2 


Ss 


i 


Ono OO0O OOOO BOOCOOCOOOOO0OOO00000 ooo 
[a ce eh bs bo b= Pes Bee Co ee oo Ba 6 De Bs fe Pee Bn fn & 2 ne Gs HY Bo Bs Pee Bee Pie 


BS SSSS RUBY RAPZITSRAESR 


gs 


Tew © 
— oe 
R 
-_ 

a 


a3 


BUM UAL Ges CEE REE cnc cnne man isn gis Meee a 


i 
8 
3 


: 


é 


Pll Tai SOME MISCE 
osne40 


pooodt Eg | 


177652 


177525 


000125 










MACY11 27(732) 14-OCT-76 10:46 PAGE 107 
LLANEOUS OPERATIONS INVOLVING THE PC 


fe 
PC 3;G0 RELOCATE PROGRAM CODE 
Last ADORESS OF CODE TO BE RELOCATED e2ee22c2222 


[pesannsuanensnnnenncncuesecesatccotuarestsenecer ens gneneee 
T 32 CHECK BINARY BYTE OPS USING ADDRESS 
[aERIARARSABESAEOES SESE FOHAEEESENSHIESEESSSOESEEEEECSATESOAEHS 


#32, 28STSTNM TEST 
#1, $TIMES 3:00 1 riESAt ron 
339333333555 er Press 40 BE 
3 FIRST T RODRESS 0 BE RELOCATED 333333333 
. PrAB : AINS THE ADDRESS OF REL3 
RO, g8FRSTAD Seve “ 
ARO EE CURRENT Oe TON FACTOR 
RO; JSFACTOR >SAVE RELOCATION FACTOR 
PEOesrem, Saat LO AlOrESS 
830,a *ADJUST 
ee 
aheXEC -BR IF TEST CODE TO BE EXECUTED 
RELE3 
#125252, R3 
Rae Ras | o6s63- Ra=12S000 
#125000, R4 CHECK RESULT 
3 RY ifa=1Seses° Rd =s00252 
sebe ,R4 *CHECK RESULT 
RY.RY 42177652 
#1/7652,R4 "CHECK RESULT 
#177525, R4 
+4 
RY sRY 
RY. RY Ru =hooT se 
#125,R4 CHECK RESULT 
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SECTION 
4 1 BiSB  -R3, R4 :R3=125252, R4=000377 
oo ee io INCB. ORS 
4964 Oi 001401 - BEQ +4 
ise 017334 104000 HLT 
*SFFLALELSLERELEFSELLELERALALAFSHLKLSLAELSSES RHRELESAASALSESLELSS LES 
496 t STEST 33 CHECK BINARY BYTE OPS ADDRE ? 
SE RESLHSRELSSLELSSSESS REL ELLRHFRESSESRHSS < SSLELEKE SES ERE SHE SSSERE 
use “| ie +6133: nove 833, 28STSTNY sLOAD TEST NUMBER 
432 ren fie INB? SERVE FOR 0 ADDRESSES & DATA 
4373 1736 sevens: Wi 6 CONTAIN ee G00 BYTE" 
Wave ot 5 Conta : best O00 BTEY 
4376 017363 DBINB?: “HORD SCONTAING AOORE DATA 
1 .WORD 0 :CONTAINS DEST DATA 
17364 BINS7: MOV PC. RO 
Se 17366 CMP -(RD),-(RO) ;RO = ADDRESS OF DEST DATA 
i381 1 MOV RO, -6(RO) ‘LOAD ADDRES OF DEST EVEN BYTE DATA 
4983 reat ONC RotRo OAD ADDRESS OF DEST 900 BYTE DATA 
4984 017404 ST -(ROQ) ‘ ROSRODRE SS S OF SOURCE DATA 
4985 17405 MOV RO, -10(RO) *LOAD ADDRESS OF SOURCE EVEN BYTE DATA 
436 1741 MOV RO; -6( RO) 
a7 17416 INC -6[RO) ;LOAD ADDRESS OF SOURCE ODD BYTE DATA 
4989 017422 CLR R2 sSET INDEX REGISTERS 
4999 Bi ried MOV #2,R3 :9SBINB7 (2): SS81NB/(3) REFERENCE EVEN 8 
4991 0174 MOV 8-4, 4 00D BYTE SOURCE DATA; aDBINB7(4) -aDBINS7(5) 
i238 017434 MOV #-2,R5 *REFERENCE DEST EVENS ODD BYTE Data 
4994 
ueSe pipade Rh CRD” ore Best BATA 
a7 tana MOV DEFACTOR, -(SP) . REL OCA TON FACTOR 
17450 ADD (SP), Re 0 INDEX VALUES 
4999 017452 B00 (SP)'R3 
5000 017454 (SP) RY 
2001 17456 ADD (SP)+,R5 
5003 017460 MOVB  #-1,9SBINB7(3) ;SRC DATA = 1774 
5004 17466 BITE #377, QSBINB7(2) ;CHECK THAT E VEN BYTE WAS NOT AFFECTED 
500s 0174 Q +4 >BY MOVE Insta 
5006 017476 HLT 
ar 1 I INB7(3) , @OBINB7(4) 
Bn 17ebe Flee SReINe? Cay” sCHECK THAT BIS SET ALL BITS 
5010 01751 BEQ +4 
suis 17514 HLT 
6013 01751 DECB  aDBINB7(S) DEST DATA = 177400 
5014 O01 INC QDBINB7(4) ‘DEST DATA = 177401 
Bois 1 cH 3SBINB7(3) , @DBINB7(5) 
16 017534 Q +4 
6017 017536 HLT 
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Y 
HECK BINARY BYTE OPS USING 4 


+ | meee. eal AA CPU EXERCISOR 


MAI 
DEQKCS.P1l 





, 9OBIN87(S) 


@SB8INB7(3) 
+4 


: 
s 
é 


3 
3 
Kr 
S 
? 
r 
35 
aan 


SOURCE OOD BYTE BY BISING A BIT FROM 


;SRC DATA = 000000 
OURCE YT 
INST) se 


NT 





;CHECK RESULT 


,» 9SBINB7 (2) 


77400 


+4 


O17S8S2 105073 017350 
Reise 
174 


77 


;DEST DATA = 100000 


;SRC_DATA 


17610 iie?7s 600200 01730 


Gag 








5 
“a 
ne 2 3 
gig fo 
ocge Eo : 
SEs oa g 
= ge 85 : un 3 
S fee S82 8 ~ 
y viz 3 ° 4 z 
5 Soe f § 
5 1 EEG aa a 2 
os oS o> + 2 we 
BS 5 ae] 2 bs uw u ~ sé ~ + + 
22,2 +2 a ean ee 
seat at eetee py eae 2 Fee 


ESGnes BagSBBSSSS BSera se sea es 


17360 017350 BIC7: 





pM gs 


RMEHER REEREREEER RERRRRRRERRRERERERER 


EG SO hd ed a dd ed Od ed Od ed ed Oh Oh ed ed we Hh ed Hd 
OQO000O0 28000000000 8O000000000000000000 


GRR RRRRRA RR OE a Oe ae 


pee ea 









C8.P1l T33 
Ge fine tas 
ee 

ie 
Bie 

ie 

ES Aeon 104000 
19 16 
1 
Ss lke lies 
SOSS 
Se Be uae 
5093 20054 010700 
Bio 02 00SE 

101 Oe006 
B03 euuee OoNvae 
ie 
ie ee 
0 pele : 1001 
4 a 
113 106 
Ae i 
eile ath 
etl? : 
e118 1 
big fet 
21 1 
5123 1 
He ie 
a 
He Ha 
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CHECK BINARY BYTE OPS USING ADDRESS MODE 7 


rst a(R3)+ 
Hepp a(R3)+ 
HLT 
CLRD = a=(R3) 
HLT 
177775 BITE a.+1,R2 
177773 “NEGB oa. 
_ HLT 
BR 2g 
poo002 1$: ADD #2, (SP) ADJUST RETURN PC 
000017 oo000e2 BIS #17, 2(SP) :SET CONDITION CODES ON RETURN 
2s: MOV #SUPSTK, SP sRESET STACK P 
oo0004 MOV #ERPRT, OHERRVEC :RESET TIME OUT T vector 
053266 000010 MOV SRESVE 
$ i A 
a MOVE ad aaSTSIMM LOAD TEST NUMBER 
oo0034 oo1202 téT34 HOVE 834, a8STSTNM sL ST NUMBER 
000012 Wie RO SET 60 ADDRESS FOR JMP INST 


(RO) 
: ;JMP INST JUMPS HERE 


;ERROR! INCORRECT CC’S AFTER JMP 


g2e ASRS 
3 


R2 ;SET INDICATOR 
PC,R3 
44 sRESERVE WORD FOR JMP ADDRESS 
0 ?CONTAINS ADDRESS FOR JMP INST 
TST (R3)+ 
MOV R3, (R3) 
MOV R3,RO 
ADD #22, (R3) ;(R3) IS JMP ADDRESS 
MOV R3, RO 
ie och3)+ ; JUMP TO ADDRESS CONTAINED IN R3 
COM Re, ;COMPLEMENT INDICATOR 
FNC Re ;CHECK INDICATOR 
BNE JMP3 
S (RO)+ 
CMP RO,R3 ;CHECK AUTO-INC R3 














W EXERCTSOR MACYL1 27(732) 14-OCT-76 10:46 PAGE 11! 
NSTRUCTIONS ; 


BeRa°,3 
ang 8 


~~ 
8) 


et 
= 


Ge 
~~ 
25 
Oo 
— 


Fa 


7aeeRR +2 


sal) 


Bx 


REVS Ia ol ZINA ISe GPA TORE SOURCE Ss GREG SOIREE 
RBsgs*aeSS OBseta* MBedass*ete8s S 


BB Be Be hs be = 0 Fh a 8 0 Be Fb Bb = ae es 2 2 fh bh 2 2 Fo bo 2 P= Gs ho Ho Pe 


SUSU USUI STITT UST UTI UIU 





aE IP IHP ReGI GISTER 
SET UP CHECK REGISTER 


;COMPLEMENT INDICATOR 


ie ADDRESS 
;USE RY AS ADDRESS 
i ChECK INDICATOR 


;CHECK AUTO-DEC RY 


;RESERVE WORD FOR JMP ADDRESS 
;CONTAINS JUMP ADDRESS 


;LOAD CHECK REGISTER 
;JUMP TO 2$ VIA 1$ ABOVE 
CHECK INDICATOR 


;CHECK AUTO-DEC R3 


;COMPLEMENT INDICATOR 


ran a Ss 


38 TTTiTiTitiittitiiiiiitiiiiiiiiiittitittttt LL 
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QKCB.P T35 CHECK JSR INSTRUCTIONS 





;*TEST 35 CHECK JSR INSTRUCTIONS 
tse Ve ase SSIS on leer eee 


000035 001202 itt : OAD TEST 
1 001506 JSR1: MOV JHFACTOR, RS GET RELOCATION FACTOR 
1 020404 MOV #3$, Re FORM DEST ADRS 
0002 


fone 


b— bo hae 








19 
Ste ADD RS, Re “ADD RELOCATION FACTOR 
133 acc *PRESET CC’S 
195 ISR RS, (R2) 360 TO 3$ VIA Re 
19 1S: TST R2 :CHECK INDICATOR 
197 101 BNE ug *Re SHOULD=0 
2133 70s 001506 cHP SEFACTOR, RS >CHECK THAT RTS RS RESTORED RS 
4 JSR3 TO NEXT TEST 
esr eee 25: TS RS Be TURN FROM OUTINE 
O20404 103011 38: BCC Hs :CHECK THAT JSR DID NOT 
ae 2 te 
S206 Oe0414 CLR R2 sCLEAR INDICATOR 
5207 e046 Weaed 020366 MOV #1$,R4 ;GET UNRELOCATED RETURN ADDRESS 
Getige D164 ADD (SPRY ADD RELOCATION FACTOR (OLD RS) 
at 1 gr By. RS CHECK F STAT REG RO CONTAC GOTURY PC 
csi rae rita 4$: HL t BRRORI ABOVE 
ati 001506 He ER eee ON Rear eee soe OCATION FACTOR 
este hae ' GR : 2SET RRDScATOR 
S216 Oe0440 012705 O20460 MOV $1$,R5 
ae PLE pabddaede 
i : ie _— ADD ass trey ; (RS)=DEST 
asst anes ey BR 2s’ RESERVE OR ss 
1$ WORD oO *CONTAINS DEST ADRS FOR JSR 
JSR RY, 2(RS)+ JSR TO 5$ VIA 1$ ABOVE 
3s: Ine RD :CHECK INDICATOR 
t BR Bea 
4§: COM RO .C T INDICATOR 
7 toes RTS 4 FRETURN FROM SUBROUTINE 
1 020464 SS: MOV #3$,R3 *GET UNRELOCATED RETURN ADDRESS 
b 160: ADD (SP}_.R3 "ADD RELOCATION FACTOR (OLD R4) 
CMP RY,RS 
rath ior no Re CHECK AUTO-INC RS 
020514 gro Ot«S 260 TO RTS 
16 6S: HLT : VE 
“CHECK JSR INST ADDRESS MODE 4 
001506 SSR4: ies oar Tor Ra 





sss 


ee 


















Se PSUS RARER EAMM SAS aus ca aint inva ey pi 
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Dru 
RY 
Vi aels 


Est Besesce Preceeeree 


esas 


T3S 


; 


ae 


8 
Se 


aie: Ee 


a 


020542 
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001202 
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BeOS 





1$: 
2s: 24 (R3)+, (R3)+ 
JSR RY, -(R3) G0 TO 25 
3S HLT 
JSR6 :GO TO NEXT TEST 
4S ab 5g 
Boy : ;GET UNRELOCATED RETURN ADDRESS 
ADD t355°8 *ADD RELOCATION FACTOR cSLD 
CMP R2,R4 *CHECK THAT CALCULATED RE 
S$ 7PC = NEW RY 
S (R4)+ 
RTS RY 
SS: HLT 
-TEST JSR INST ADDRESS MODE 6 
hohe. BR Fr} 
° 3$ , 
pe’ 
JSA7 3G0 TO NEXT TEST 
“ERROR ON CC’S 


BR 
JSR 
BMI 
HLT 

3$: CMP (RO 
CMP ;CHECK THAT RETURN ADDRESS IS ON THE 
ri 3 STACK 


SEN ;SET N 
RTS PC 


“TEST JSR INST ADDRESS MODE 7 
$SR7: MOV oar Aer OR, -(SP) sGET ET RELOCATION FACTOR 


#15, (SP)° ORM ADDRESS OF 1$ BELOW 
? iepr ALL ct 2 
JSR RO, a(SP) :JSR TO 1 
a 
is 
1S: RT RO s RETURN 
33: ae *ERROR!! INCORRECT CC’S 


+ seuuuaceuueuenususueuceaeeeceeueneuencucseseusaunsuseecessaeess 


Hi T CK I0T nee ( /PSLB) 
tars TEs HIS, TEST CHECKS THe Tie es ie CORRECT AFTER THE IOT AND THAT THE 
i (F OTVEC+2) IS CORRECT. 


reaeveneenvenneey tenn venseenntenteeavesUiSeb0 008 egg teaaeea 
téT36 #36, J8STSTNM sLOAD TEST NUMBER 






IOTTST: MOV SIOTVEC+2, RS 
S 4,-(RO) ;SET PRIORITY LEVEL 4 IN PSW 
MOV (RO), (RS) ;SET IOTVEC+2 = PSW 
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Pll T36 CHECK IOT TRAP (AND ROLB/ASLB) 
5296 1 MOV (RS). RY ;SAVE IN RY 
5098 rea 1 Y beat) 
= ty OrBeue SOY a1§-. (SP) sLOAD I0T TRAP VECTOR 
1 #PR74+17, (RO) 
St: eat pierig ppp sa4 BtE #PRS+4. (RO) sPaWex x 0K x00 101 1X1 000 
1 MOV (RO)+, R3 pA. 
NOV R3, -(RO) STORE Mogi thov CHANGED IT) 
5307 012737 O44S32 O00020 10%: MOV #SSCOPE, J#IOTVEC sRESTORE IOT VECTOR 
ta HLT ERROR! Ri Jor FAILED TO TRAP 
09 BR TST37 33G0 TO NEXT 
eile 02074 012002 1S: MOV (RO)+,R2 GET PSW AFTER IOT TRAP 
13 020750 012725 o44S32 MOV SSSCOPE ,(RS)+ RESTORE 1OTVEC 
14 020754 012715 MOV arr (RS) sBNO IOTVEC+2 
1 MOV “tsp FORM PC OF 10$ ABOVE 
1 16 177752 ADD fios-> 
i 022626 CMP (SP)+, Med punts RETURN PC ON STACK 
ig ane (SP)+,R3 sCHECK SAVED PSW 
1034 BNE 995 
atte b3670 140000 BIT aUN, RS sBRANCH TO 3S IF IN USER MODE 
1004 001 BNE 2s ;BRANCH TO 2$ IF IN SUPER NODE 
621006 cH Re,R4 :CHECK PSW AFTER IOT 
Beibie pooNis peg 
i 4 boomy Bi0000 OE - te SOE ke ORR runs SUPER MSRE® 
1 es fer iE PREY, SUPE AFTER IOT 
1 1017 BNE 
1030 BR 
103¢ 030000 3S: I sPUM, RY sSET PREV USER MODE 
ete Bt Re ra > CHECK AFTER IOT 
1040 BNE 
021 4§: CLR Re 
Del SEC 
De 1 oe RO ;ROTATE RO 
bei 2 :UNTIL V SETS (RO=200) 
ik ee” 3s ;SHIFT SHOULD “ET CARRY 
4 
“4 ae 
ith Be re 
( ,cef 995: fre OR! ROL/ASL FAILED TO SET 





;ERR 
;CC’S PROPERLY (IF Ro=0) OR IN- 
SCORRECT PSW AFTER IOT (IF Re NOT O) 


;RESTORE PSW 





RR 
33 
a 
3s 
23 
oz 












021100 012706 000700 
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;RESTORE STACK PTR 


MOV SSUPSTK 
33 jpupenstanansuatessceadicessasgosessunslanteeseecnnseenecesnness 
ee ESE AE eR ABE EE SEE SRE RA EAR EEE ER EERE EEE EEE 
NM ST NUMBER 


921104 12737 000037 oo1202 $8137: Score 837, d8STST sL 
QUIV 1 iRE INE HLT CALL 
1114 772 Rov sSeanOn aE IOTVEC : Eee VECTOR 
il P0348 Bopos aslOTVEce 
S11 cir :S) 
il ADD 1-., (SP) 
1149 eaeey HOV (SP)+, DREMTVEC “si 
1146 nov 1gecutPSh, BUENTVECH2 RETAIN CURRENT PSW ON TRAP 
il eae : ;TRAP TO nT 
ti at ats + eeRoR: INCORRECT cc’s T ON RETURN 
ll BYC 1B rye SHOULD? VE_SET SET ON ENT TRA 
11 :RO=000377 , CC’ 
ll ADC >RO=000000; CC’ at 
lize ROR RO ; :RO=000200, CC’§=i010 
iB pe Ene 
1 NeGB RO ;RO=000200, CC’S=1010 
rl BPL ERTie 
lel CLV ‘cere. ry? 
1 SEC T °C? 
1 14 CBORD ?RO=000177, CC’S=0011 
i t  ENTIB 
1 V ;CLEAR ’V’ 
ie 4 0 ;RO=000200,CC’S=1011 
Br 
1 Tl 
i BSR SS ATET RO UNTIL *V’ CLEARS 
1 ~ ; 
BR lad 
aT ORTH RO=000377 
ao : 
lel BCC ENTID : 
aI fer ORO. 
f BEG +4 
i 0 , #EMTVEC T T 
Get HOV 8PR7 Rentiecys igre ORToRT TY 3 BN ERROR 
Oe HOV aSScOPE ,GETOTVEC RESTORE IOT VECTOR 
EQUIV oR »HLT ;REDEFINE HLT CALL 















QKCB.P1l 
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SRENSe Tee EeReNiT 
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T4O HECK 


051372 


051372 


R 
x 


oa 


SDs Se SS 


001202 


aoooie 


000034 


000016 


157666 


XERCISOR MACY1 
INSTRUCTION TRAP 
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QUENCE 


; LRALALEAARERRARE LE LALAL ALLL LLALRAL ARAL LEAK ASSL ARE LALAR SEES ES 


IETEST 40 
+8 


TRAP: BHI 


TRAPIC: MOV 


CHECK TRAP INSTRUCTION TRAP SEQUENC 


FS Ea Fn circ eee Or 


#PR7,a ;LOCK OUT LINE CLOCK 
BPR?  SATBITVEC#2 


ee 
(SP)+, SathaPvec att 
DePSW, JaTRAPVEC+E sRETAIN CURRENT PSW ON TRAP 
PC,RO 
;SET 2 BIT 
:TRAP TO TRAPI 
,ii2 
#STRAP, J8TRAPVEC RESTORE TRAP VECTOR 
+ 
a3 tRaP . se TRAPVEC RESTORE TRAP VECTOR 
TRAPIC 
+12 :N BIT GOT SET ON TRAP 
a TRAP, DeTRAPVEC’ RESTORE TRAP VECTOR 
RO, | a’ top) sCHECK LOW BYTE OF RETURN PC ON 
asT lee. aeTRAPVEC’ sRESTORE IPAP VECTOR 
7{SP), -(SP) 
(SP)+; (SP)+ 
;RETURN TO INST FOLLOWING TRAP (1S) 
8TRAPVEC+2, Re ;RESTORE VECTORS 
wPRZ (Re) 
8STRAP, -(R2) 
#PR7, aRTBITVEC+2 
aePSi ;GO BACK TO PRIORITY 0 
PC, Re 
ya Re 
sae Oe 0C,PC 3GO RELOCATE PROGRAM CODE 


OE as Lr oeeet ar le & te ox eneee tessa 


: 3% 
tétui: HOVE 





-SBTTL START OF SECTION 4 


UTES MQ CHECK STICK: OVERRUN 
ete a ant kenteee ntee eee eee 


gins 3300 1 1HERATION 





3, 






ee 
' 


mm 

g c.| 
corm 
0 


pe 
~ 


SRR SOHO fe: 


en ee ee ee ee oe ne 


Seon 


é 


SER SBaBeRRSERER IS IAI Ia aoE SE 


2 SinP cone 


2 
R 


ANN 
He 
mo 


Ds 


[a a bb bo Fb bh 8 Ge Bo Be bo po ee cs 


en ee ee ee oe oe oe 


Wee BSESINNT 


Ree eee 


SENET 
S 


i 


022014 


oom 


G5 os Bes BSS 


bo he Bae pe 
oe 


e 


: 


RRL 
a 
o 


Ss § 
a 


BGS i 


3S 


nr: 


ued 


‘T 
. 
Js 


rr FeRsT ADDRESS TO 3 RELOCATED 444444444 


MOV PC 
TST 80 /GONTAINS THE ADDRESS OF REL4 
nov 0, AFRSTAD a 
sug aie : carter vee 
[coo ne 
MOV sisfeee oeSLPAOR 
13:8 ath BR IF TEST CODE TO BE EXECUTED 
INP Reve 

aePSu, 7S ;SAVE STATUS IN 7$ BELOW 
CLR aePSW 


sae 
JSR PC, ACLATBIT G0 CLEAR 'T’ B 


eC RLPSID Bing HO™ 0 


ADD -., (SP) BELOW 
HOV b SUERRVER ey A Rate TOR 7 ON TRAP 
HOV SUBPTVEC, (PC)+  jSAVE ADRS 

ADD #41$-2$, (SP)  ; FORM ADDRESS OF 41$ BELOW 


3 
& 


:SET BPT VECTOR TO 41S 


MOV #340, deBPTVEC+2 
MOV #376, R3 
MOV R3, (R3) ;LOHD 376 INTO ADDRESS 376 
BY Whos Sect I cutees QP cme 
he is’ -. ge ER RRiCH NOT IN KERNEL 
Lou INSTRUCTIONS sentient AN OW TRAP 
ST (SP) : BE A NON MODIFYING INST 
ont Sty Rm EE 
BIS a(SP);a(SP)+ sBECISE oF abpReee RODE 3 
BIS -(5P))a(5P) *BECAUSE OF ADDRESS MODE 
MOV 320000, 20000(SP) 
BR 3$ ;BRANCH OVER NON KERNEL MODE TESTS 
LOW TRAP WILL OCCUR IF NOT MODE!!! 
Hop 7$+1, a8PSW+1 Rest ore mae ITS IN 
MOV SP SET STACK 
ers : (SP) (SP) SHOULD NO 
(SP)’-2(SP) 
Rov" aarshel SF seavoeecrre 3 STACK 
PT be. RESTORE 
SERVICE ROUTINE 
MOV (SP)+,RO ;SAVE PC OF INSTRUCTION THAT TRAPPED 
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tke st POP 11/70 CPU pexiom 
DEGKCB.Pil START OF SECTION 


258 BEERS re 009700 nov ssustne SP iSET STACK STACK 


s ERROR! AN Peres THAT WAS NOT 

NS PC, REC ONTATNS PSW 
BR 6S EXIT TES 

BELOW INSTRUCTIONS WILL sauté A STACK OVERFLOW 


TACK PTR IS AT 376 
000066 000004 ee foo $-2$, Q8ERRVEC ;SET ERROR VECTOR TO 4$ 
3, SP ;SET STACK PTR AT 376 


10:46 PAGE 118 

















es 000001 Hove a1 Re 
CLR 
CLR (SP) SETS oN 0 IN RO 
ASL R2 T NOICATOR BIT 
INCB = (SP)+ ‘SHE BIT } 
ASL Re 
Sy ; FC,~(SP) ;SETS BIT 2 IN RO 
BP ;SETS BIT 3 IN RO 
coy ASL Re 
000014 ISR PC, 40S SETS BIT 4 IN RO 
coy ASL R2 
177776 BIS SP, -2(SP) ;SETS BIT S IN RO 
BR 5s 
PROGRAM WILL TRAP HERE ON OVERFLOW TRAP 
5S ig: BI $ R2,RO SET BFPROPRIATE BIT IN RO 
55 TI RETURN FROM T 
a 001000 40S: BIS #1000, RO ;SET IND THAT JSR WAS EXECUTED 
cy 000400 41$: BIS #400, RO ;SET IND THAT BPT WAS EXECUTED 
5S -CHECK THAT ABOVE INSRUCTIONS DID TRAP 
eee 022122 012706 900709 és: MOV uSUPSTK, SET STACK PTR 
22126 022700 0014 CMP ,RO * EACH INSTRUCTION SET A BIT IN RO 
5560 Oeel3se OO1401 Q :RO= 1477 
5561 O22134 104000 
-EXIT ROUTINE 
022136 012706 001200 t$: MOV ;SET KERNEL STACK PTR 
CESS 142 016737 177516 000014 MOV 3s Xt at RESTORE BPT VECTOR 
Bape i eee ” oath treet OLD PSW ONTO STACK 
B bse 7S: Be, =p) |conTAINS, SAVED Fu ONTO STACK 
5570 oes 000006 BOD AG’ (SP sPURH CURR F 
170 0127 MOV #SUPSTK, SP TACK 
2275 174 6 en oo0004 MOV tERPRT S#ERRVEC RE cee Phe’ ou OUT VECTOR 
5574 1 177778 000006 MOV aePSw sahenmiecie 
6575 Oecel 000006 BI #PR7, QHERRVEC+E 
578 2216 pie? 37 000020 000006 BI weird, 38 SEP RECT 
177766 












~- 
oo 
o 
in 
. 





ERECER SEE O Ona 
veuuee 





001503 
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Pil T42 bee Fi SERVED INET Tad set Rab : 
ireeT U2 CHECK THAT (LL REGERVED INSTRUCTIONS TRAP 
sirEst 42 CHECK THAT ALL RESERVED INSTRUCTI 


ONS TRAP 
jeecevsannevusnsenseoneesenessnssevueneenseessoneestessesseatess 
téry2: move #42, J8STSTNM ;LOAD TEST NUMBER 


sc 
RESTRP: MOV #S$,Re ;GET ADDRESS OF RESERVED INSTRUCTION TABLE 
ADD dar ACTOR, Re 
BITS s40,as0PT.CP+1 ;CHECK IF 14s FL FLOATING POINT IS AVAIL. 
Q fe *BRONCH IF NOT AVAIL 
LR se Teale TERMINATOR 6 GROUP 7 
MOV 84S. QURESVEC  :SET INSTRUCTION TRAP 
1S SOY vac TOR, a ssi cer T FIRST INSTRUCTION 
BEQ 7§ Rares fre TALE 
MOV (R2)+, R4 rin TRUCTION IN GROUP 
3s: MOV R3, (PC) s EXE ie TION 
: .WORD OO Lo INSTRUCTION 
ty ey eah? Penis ce a 
aT as : ION ceae 
4§: MOV #415, (SP) ; 
asFACTOR, (SP) 370 TURN a wig 
RT RETURN TO 41S 
41S: R3,R4 *HAS GROUP OF RESERVED INSTRUCTIONS 
re 4s i PERERA THIS RESERVED INSTRUCTION 
in NOTE ONE ONE AND EXECUTE 


2s 
- TABLE oF 11/40, 11/45 RESERVED INSTRUC TIONS ONS (0 TERMINATES THE TABLE) 


és: a ; GROUP 
21 GROUP 2 
;GROUP 3 
:GROUP 4 
oEo99 _ 
106400 GROUP 5 
108477 _ 
106709 ;GROUP 6 
" SOS: 1h ‘croup ? FLOATING POINT 
177777 e INSTRUCTIONS 
0 0 TERMINATES THE TABLE 
000010 7S: MOV SRESERR, DURESVEC STORE TRAP 
iii amuadhakiabalentetneinanmenat 
tRTEST 43 CHECK THAT ALL BITS IN THE PSW CAN T 
ituae MOVe ea dest HEEFRSFAREFRELAPSERELAEK LEE AAESARAERAEBRRE 
oo1202 téT43: HOVE. #43, 28STSTN" sLOAD TEST NUMBER 
PSWCHK: 738 guttton ;IF MEM MGMT IS ON SKIP THIS TEST 
000132 MOV aePSW, 3S ;SAVE STATUS 
CLR asPSW *CLEAR MODE BITS IN PSW 
JSR PC,SCLRTBIT  ;GO CLEAR 'T’ BIT IF SET 
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P 





aibsiee 
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CHECK THAT ALL BITS IN THE PSW CAN BE SET AND CLEARED 


000016 


177776 


001202 
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MOV asTBIIVEC#2, ~(SP) 
Hoy JR4 sLOAD ADDRESS OF PSW INTO RY 
ts (RY) cme THAT PSW WAS CLEARED 
are ’ sERROR! PSW FAILED TO CLEAR 
MOV #1703S7,R0 
BIS #170000; RO sSET BITS 15-12 IF MEM MGMT 
10$: Mov #1,Re Re = TEST BIT 
18: ait Re, RO *CHECK IF BIT CAN BE SET/CLEARED 
CLR DeTBITVEC+2 
err Re, #0 CHECK IF TEST WILL SET ’T’ BIT 
MOV #RTI, d8TBITVEC+2;SET RTI INTO RETURN 
20S: CLR (RY) sC 
BIS R2, (RY) :SET Re INTO PSW 
MOV (R4) .R3 GET BIT 
chp Re Rs :CHECK THAT BIT WAS SET IN PSW 
ALY ce > ERROR! BIT IN R2 FAILED TO SET IN PSW 
gid Re, (RY) sclenn aoe PSW 
MOV (R4),R3 9a hed 
a ante! Lir'ly AE PLS We cla Wh Ba 
2s: ASL R2 >SHIFT TEST BIT 
BCC 1§ : BRANCH IF ALL BITS NOT TESTED 
CLR (RY) CLEAR STATUS 
MOV (SP)+, J8TBITVEC+2 sRESTORE T BIT RETURN 
MOV (PC)+’ =(SP) PUSH ORIGINAL STATUS ON STACK 
3S: .WORD O > CONTAINS ORIGINAL PSW 
MOV PC, -(SP) >SET RETURN 
ADD 86; (SP) 
us AYP SULRY ETE PSH IN RY 
. MOVB iSET PRIORITY 
JSR | *T? F 
: TTT TTT TTT TTT TT TT TTTTETTTTT TTT TTT TT TITS TTT TTT TTT ttt ttt TTT TT | 
j TEST 4y CHECK THAT ALL BITS IN THE CURRENT STACK PTR CAN "BE SET CLEARED 
a ve eM STI ntoaD Teel MEER 
Titra 844, J8STSTNM sLORD TEST NUMBER 
CHKSP: e SP,R3 sSAVE STACK PTR 
1s eS 2 STATE ON BTT THROUGH ALL BIT 
; BCS 1$ *BIT PAST? 
Ine 3 "SHOULD INCREMENT SP TO 0 
MOV SP, R2 ;SAVE ERROR STACK PTR 
MOV R3, SP iBET ain PTR FOR TRAP 
HLT H : 
MOV ,SP 








;RESTORE ORIGINAL STACK PTR 
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aia Gene So Ge 


ie 


A2os Sue HHSEK ESOT M aa one STE TTT ORE EONS 


TH4 


010600 
010003 


ocso4 
12746 
13 


bs 


Ses 


pase 
Bs stetated 


Es 
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So | mae POP 11/70 CPU EXERCISOR 
DEQK CHECK THAT ALL BITS IN THE CURRENT STACK PTR CAN BE SET CLEARED 


0008?7 


177400 


177401 
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iCHECK BYTE OPERATIONS USING THE STACK 
SPCHK: MOV SP, RO sSAVE STACK PTR 
MOV RO,R3 A 
CLR -(R3) 
MOVB = #1. =( SP) :(SP) = 377 
chp 8377, (R3) ‘CHECK THAT ONLY EVEN BYTE WAS AFFECTED 
CMP R3, SP sCHECK AUTO-DEC 
BEQ +4 
1$: HLT 
INCB = (SP)+ 
TST (R3)4 ;CHECK RESULT 
BNE 2s 
CMP RO, SP sCHECK AUTO-INC 
BEQ +4 
es: HLT 
COM -(R3) :(R3)2177777 
BICB (SP), (R3) 
CMP #177400,(R3)  ;CHECK RESULT 
BNE 3$ 
CMP SP,R3 
BEQ +4 
3s: HLT 
BITB (SP)+,#377 
BNE 4u§ 
CMP SP,RO 
BE +4 
4§: HL 
AO OCe’SP 
MOV #177401, R2 
CMPB Re,~ (SP) 
os (SP)+,R2 
BNE cs 
CMP RO, SP 
BEQ +4 
Ss: HLT 
ae as 
,- (SP) sRESTORE ORIGINAL PSW TO STACK 
MOV PC, -(SP) 
B00 #6, (SP) 

: itest We CHECK THAT "C" BIT SETS/CLEARS PROPERLY 
2 &TES CHECK THAT ’C’ BIT SETS/CLEARS PROPERL 
jeaseenteagveuucenieaneeneeeneeanuestseaesseenpessienseseeatey 

eee HOVE #45, 28STSTNM sLOAD TEST NUMBER 

CBIT: MOV #177776,(PC)+  ;LOAD CONSTANT 

18: .WORD O 

MOV PC,RO ;GET CURRENT PC 





AINDEC-11-DEQKC-B FOP 11/70 CPU ENERCTSOR tM 101% PR 


aru? a is 2s: Abe HRDD 1c) BIT 10 18 GOVE 


;UNTIL *V’ T 
077776 9177754 rot cay a 


5 ERROR NCORRECT - eel IN 1$ ABOVE 
; SS OF DATA 


as 


as 
5 


5 CECH THAT Cert 
:AND THAT NUMBER 


SET Y wen A NUMBER (CURRENT PC) 
Rs SoS LET ts 


[ = ] 
3 
somes 


ae 
e 


o~- 


ts 


R2RS 
ZeBud 
® 


stat 
SRRRK 
0 bs bo bo pe 
be 
£MO 
B58 

z 

= 


th 


xy 


am 
2m 


nm 


7 
T 


BRK 


© eewewe wees 
N<O 
owwm 
>-0— 0 


LED TO SET 
CTLY 


: 
: 
2 
3 
: 


5 - 
| 
ain 
a ee a ae ee ee oe oo oe nd 


APIA 

S8ESS? KRERPRSS 
CORCE- pt tat 
Bisse beens 


ADDRESS OF CODE TO BE RELOCATED 44444444444 
SEE EEE EEE a aE aE 
aI eee 


Het 
3300 1 1iERATION 


OCATED SSSSSSSSS 


T 
mo epee THE ADDRESS OF RELS 
9 

:GET pC 

:SUBTRACT RELOCATION FACTOR 
;SAVE RELOCATION FACTOR 

:SET LOOP ADDRESS 


5748 
5730 
: 
ere? 
e7s9 
e761 
: 
eve? 
e769 
en fee 
e777 
e779 
e781 
5782 
: 
5788 
oe 
ce 
: 


eae 
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START OF SECTION S 


062737 000030 
013037 001212 ice aeSLPADR 





Ay A 


FY a ee 
= OOO £W-OOE 


+8 


v-_ 
Fa} 
oe 
aa 


aes Fee 
238, B8ge°-ag8 
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a 
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B= Ne er BH a 
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X 
Xx 
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X 
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CDOMSERARSESS Koes 











,ADJUST 
;8R IF TEST CODE TO BE EXECUTED 


HEATENO Sich 1), INTO Ro 


; CHECK RESULT cc’s 


CHECK RESULT 


;CHECK RESULT 
;ERROR! XOR FAILED 


;SET ADDRESS REGISTER 


iConratne Teor bara TEST DATA 
; SI eo SS INTO 


3 ADDRE del NSB RO=1 
OTHE RITSE (RO) 
>CHECK SIGN OF ADDRESS 


;COMPLEMENT CHECK REG IF NEG 
;CHECK RESULT OF SX 





;ERROR! SXT FAILED TO EXTEND SIGN PROPERLY 


;PRESET DATA 


NOR 1D 09080" WITH 100000 RESULT = 0 


sCHECK CC’S AFTER XOR 


;CHECK RESULT (0) 
;CHECK THAT REG WAS NOT AFFECTED 
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Beg 023414 010702 MoV PCR. 
S860 O23416 O22222 CMP (RE), (R2)+ 
ages init Foro Bt ipPePENED FoR-onTa On 
5863 023424 Olevee 125252 SXT4: Hoy #125252, (R2)+ sPRESET Dara 
¢ BSase Braves SR OPC Rape 
5866 O23434 010700 MOV PC’RO GET PC 
S867 740 TST -(RO) sSUBTRECT 2 FROM PC 
1 COM RO =RESULT OF XOR PC-1 ABOVE 

5869 4 XOR RO, ~(R2) *CHECK RESULT OF SXT AND XOR ABOVE 
Ber beaaue sitar XOR24: HLT . sERROR! SXT & XOR ABOVE INCORRECT 
5873 023450 012704 000001 MOV #1, R4 SET -RY 
in Ce Falithen «ESET OnTI 
be7e BMI XOR6 

ASL RY SHIFT 
aa ea ge 
wor Ru, XORGA + OReRE1I7779 

a: XOR , XORGA sXOR PC WITH XOR6A (177777) 
HOY PC XORE FORM PC AS USED IN XOR ABOVE 
588s COM x 
5806 CHP XOR6B, XOREA sXOR6A SHOULD = COMPLEMENT OF PC 
2B88 HLT : sERROR! XOR TESTS ABOVE FAILED 
3850 o00402 BR +6 
bB3e 923540 yoooog KOREA: -HORD 2 sCONTAINS DATA USED BY TEST ABOVE 
ceac = 
se fs wee frre BY SOEAr7=RO ET SUE OPERO FUR AD 
bb38 rt BNE oxTb *CHECK CC’S AFTER EXTENDING ZERO’S 
5900 ti oie BCS SXT6 
cae I Bvs SxTb 
eas SXTé: HLT sERROR! SXT FAILED 
ESS 01 000001 MOV #1,Re iSET. DEST OPERAND FOR ADD 
— EN RAPTORS 11.000 FRE Ta 
SUL 

e . 023540 Sx? XOREAC3) EXTEND SIGN OF ADD ABOVE 
2210 Gosaee 177724 ine XORER ;CHECK RESULT OF SXT 
5912 104000 SXTbA: HLT : sERROR! SXT ABOVE FAILED TO EXTEND 
£913 : SIGN 
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RS 
i=} 





qgamaans 
—OOMOrnut£ 





PUL GMES esses cea risen 





BRRagS 





ee 








ay 















000047 001202 


11~DEGKC ES EP ob cee 
ees | 
023644 010467 177754 
023656 104000 
Eee ten 
Ge3666 104000 
gan pam 
eee ie 
BR BBE ume 
023714 001401 
023716 104000 
Bye ar 
773 
eee 
ere Ean ie 
1401 
0e3746 104000 
023750 112737 
023756 000004 
023760 005005 
02376e 000407 
023764 005004 
023766 005705 


CPU EXERCISOR 
SECTION S 


SXRA:  .WORD 
SXRB: .WORD 


SxTé: HL 


SXT3: HLT 


SXTS: 


XOR3S: 


XOR?: 


MACYL1 27(732) 


PC,R3 
+6 

0 

0 
(R3)+ 
R3,R4 


(R4)+ 
+4 


RY, SXRA 
a(R3)+ 
+4 
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;PRESERVE 2 i FOR _ 


RESERVED WO 

s RESERVED 18 

;R3 = mes oF OF SXRA 

:CLEAR_N BI 

EXTEND ZEROS INTO SXRA 

;ERROR! SXT FAILED 
ADDRESS OF SXRB 

SLEBRC TION CODE 

INTO SXRB 

SERROR! 

;SET_N BIT 

sEXTEND ONES INTO SXRB 

;ERROR! 

;R4 = 

;SXRB = 1 (COMPLEMENT OF R4) 


UNCHANGED 
‘BAEK CONDI ION CODES 


‘Heck a 
sERROR! xXOR FAILED 
3;R3_= ADDRESS OF SXRA-2 
sCLEAR N BIT 


;ERROR! SXT FAILED 


tRMECK XOR 


sERROR! XOR FAILED 


I 
«HGHHIHEHHIHGHHIHHIBHHHIHHHHIHHHHHHHHHHHHHH HHH HH HHH HHH HE 


OF THE INSTRUCTION. 


pATEST 47 47 508 TES 
NOTE NOT INSERT ANY CODE IN FOLLOWING 0B TEST S 
SINCE IT TESTS MAXIMUM BRANCH WIDT' 
 Soceeemanunnsldttlakialht tele tetantolontocetuscttavetealoial 
juste MOVE #47, a8STSTNM sk ST NUMBER 
CLR RS CLEAR ERROR INDICATOR 
BR SOBO *BRANCH TO SOB TEST 
SOB10: CLR RY -RY = 0 
TST RS ‘HECK ERROR INDICATOR 
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3 poneranereeees 6 
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RR BRT 


a 
£ 
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+; F 
iT 
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012700 000001 


12704 100000 


a ii ie WPT 


Rinses CEP RP RP EP RR EPG LTTE i Re RCR RRR! 
R2N82 Rs susF RS 
= 





MAINDEC-11-DEQKC-B POP 11/70 CPU EXERCISOR 
i 7? ,. $08 TEST 


SOB2: 
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HLT 


CLR 
OR 


+4 


2 RRRE Ae 


cs 
Ree ed 
=o 
eae 
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oe 
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i B08 RANCHED CORRECTLY 
; : 


;CLEAR INDICATOR (RS) 
;ROTATE RIGHT RY 


0=10 
*SET CONDITION CODES 
:CHECK CONDITION CODES AFTER SOB 


CSS UN GHE THE 


CHECK CONDITION CODES AFTER 
:S0B FALLS THROUGH 

*S0B SHOULD NOT EFFECT 
CONDITION CODES. 

CHECK IF RO=0 

;ERROR! 

eee CHECK REGISTER, RO=101 
: CHECK DITION CODES AFTER 
508 SHOULD NOT EFFECT 


iE OORENENT RAPER’ REGISTER 


SCHECK THAT SOB DECRENENTS 

;SET CONDITION CODES BEFORE SOB 
OTP CK CONDTT TON CODES AFTER 
COB FALLS } 

SCHECK IF R2=0 

;ERROR! 

;RO=1 


;ERROR! 
3508 SHOULD NOT BRANCH 


;CHECK IF RO=0 AFTER SOB 
;ERROR! 

;R4=100000 

“RY4s 

:N B FOR ROULD BE SET 
sERROR! SOB DID NOT 
s INCREMENT PROPERLY 
;S0B SHOULD BRANCH 






DEOKeS Pil 


sgpeinaeserhhnisenceinseceineeseteiesteaniedl 


024142 


ee 
152 


3 
E Re 


Eiinueauaens f 


TH? 


eS 


ae 


“DEQKC-B POP 11/70 eeu EXERCISOR 
S08 TEST 


000100 


oo00so 01202 
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HLT SERROR! SOB DID NOT BRANCH 
cfg: Soe Ra eRe Fe eee TO BRANCH TO ITSELF 
: 72 3 REC EF 885 
Bea —«- SOBIO 
S0B7: HLT ERROR! 
Sog8: TST RS HECK INDICATOR (RS) 
fia Soe BRANCHES INCORRECTLY 
NG MAX. BRANCH, 


ae MILL NOT BE CLEARED AT 
THIS POINT INDICATING AN ERROR. 


BEQ +4 ;BRANCH IF SOB BRANCHES CORRECTLY 
HLT ;ERROR! 

INC RS ;SET_INDICATOR (RS) 

SOB R4,SOB9 TEST MAX. BRANCH OF’ SOB 

TST RY CHECK IF R4=0 


BEG +4 
HLT ERROR! 
HEHEHE ERE na 


TEST 


50 CHECK T NSTRUCTION 
ae geen agp ne ae re go! or pcan, 


+éTS0: Move #50, 28STSTNM sLOAD TEST 
SCOPE 
MRKTST: MOV SP, Re 
MOV PC’RS sTHE STACK LOOKS LIKE THIS AFTER 
MOV RS,RO THE JSR INSTRUCTION 
MOV RS,-(SP) > -2(SP)= THIS IS A 
MOV PC; =(SP) ; -4(5P)= PC STRING 
MOV PC, -(5P) : -6(5P)= PC+2 OF 
MOV PC, -(5P) i~10(5P}= pce FIVE 
MOV PC; =(SP) 2=12(5P)= PC+ DUMMY 
MOV pC’ -(SP) :=14(S5P)= PC+10 ARGUMENTS 
MOV #MARK+S,-(SP)  3-16(5P)= MARK 
MOV SP,RS *=20(5P)= PC PUSHED BY JSR 
JSR PC’ MARKI 
BR +10 
MARK1: RTS RS 
HL ERROR! SHOULD BE DOING MARK S INST. 
MARKEX 
CMP SP, Re 
BEG “+6 
HL s ERROR! SP NOT RETURNED TO PROPER 
BR MARKEX VALUE BY MARK INSTRUCTION 
a "yr 
ar sERROR? DID NOT RESTORE RS FROM STACK 


MARKEX: 
yj apeepeneecuveaabeaveanegurcsnsaaeenteneesnennesnneneesncen 


EST 51 

ty RTT/RTI fest Ineures THAT ? S THE INSTRUCTION FOLLOWING 

& AN at IF THE “T"B 13 3" IN THE Bey. BUT DOES HONOR 
THE TRAP IMMEDIATELY I EXECUTES AN’ RTI 
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Ob be OO 0 0 
SRRESREBSBY 








MAT Ca tf emcee ror ik 





/70 oP RCISOR MACYLL 27(732) 
(70 U EXE 1S CY11 27(732 
5% INSTRUCTION SEQUENCE-RTT 
3% 2s: RTT 
% RO 
;* 
3% S$: COM RO 
te MOV SAVPSW, 2(SP) 
3% RTI 
3# CMP #RTT, 2S 
;# ETC 
:% INSTRUCTION SQUENCE-RTI 
3% 2s: RTI 
ie cs: COM RO 
;* MOV SAVPSH, 2(SP) 
3% RT 
;# I RO 
;# CMP #RTT, 2S 
3% ETC 
© SEEERREREREREE 
0000S: oo1202 tS1Ss1: Mo #51, a8STST 
AE ea a Pi 
Bite, SIVPSH 
1S: Huy (SP) 
000116 D =. , (SP) 
000014 MOV (SP)+, S8TBITVEC 
154 MOV SAVPSH. -(SP) 
1 MOV (SP), SATBITVEC#2 
) 177776 BIS #PR7, 
0007360 ge FO R7+20 (SP) 
oo0008 ADD Poe) 
2s: RT : 
INC RO 
000340 177776 BIC #PR7, a8PSW 
000006 177760 CHP aRTT, 28 
177776 CMP #177776,RO 
BEQ 4§ 
HLT _ 
3S: Re gs 
BEG 6$ 
HL 
wv 
o00002 177726 4S: HOV TI,2$ 
SS: COM is 
000044 ooono2 Mov SAVPSH, 2(SP) 
77704 6S: MOV RTT, 2S 
nati hooot4 MOV #SRTRN, JUTBITVEC 
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;NO °T’ TRAP AFTER RTT 
;RO=000001 
;’T’ TRAP TO S$ AFTER INC 


ICLEAR 'T’ BIT IN RETURN PSH 
;RETURN TO INSTRUCTION FOLLOWING INc 


;’T’ TRAP AFTER RTI 


*RO=1 

*CLEAR 'T’ BIT IN RETURN PSW 
RETURN TO INC INSTRUCTION 
RO=000000 


CHECK 


SESE SE HEHE EAE SE SEE ESE SESE SEE EEE HEE SESE SEE EEE EEE 
NM TEST NUMBER 


HM 


CHECK ir “T“BIT SET 

Eran t0 XT 

iPM RELOCATED PC 

‘LOAD INTO TRAP VECTOR 

{GET CURRENT PSW 

;SET PRIORITY LEVEL 7 

;SET “T"BIT IN PSW ON STACK 

SADIUST PC FOR NEXT INSTRUCTION 
FOLLOWING 


RAF LSE Ea IPT oh et 
;SET PRIGRI Y 0 


CHECK IF INC WAS EXECUTED 
CHECK 


F COM-RO EXECUTED 


3 ERROR! RO NOT COMPLIMENTED 
FELT IFT 
;TEST IF TRAPED BEFORE INC INST. 
sWAS EXECUTED 

;ERROR! 

sEXIT TEST 


;RTT CHECK 


;RESTORE ’T’ TRAP VECTOR 
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Se 
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ie Gaerne Gnd 


T 
A 


i 


— 
¥ 


BSB VRRZSRH—BIsIIeA2IN-SSHVEREGR-SSOVRALONK SSH SFHESEAS 


aeeee 


Oe bs be bn Oe 2 = Fn be Fae Bae ae Be Ge 2 bn Be fe Pe Be Fn Pe Ban Bo Fe be me ne Fae Fame mw bs Be be =e fe Be Fe = =e 0 B22 & 2 P20 Fane Pw Bhs ee 


LEP PKNKN KCNC KN M MPN POPP PPK KOKO OOOO TTrrrrrour'a 


Bee 






CLR sone eBYTa 
BIC #PR7+BIT4, dUTBITVEC+2 






RTT 
: TL Eeeeiagueneeeegssanerepeeesassteenneeesssssuneeneesssasenseee 
H = SREAEESSA KAAS EKER EERA EAA AAAS KRALL LA SAES ESAS SRELAELAEAALKEESSAELES 
S2: MOVE #S2,aaSTSTNM sLOAD TEST NUMBER 
SAVPSW: .WORD ie 
RTT2A: MOV  vPSH, RO GET SAVED PSW 
CLRB RO aon ie ‘CLEAR PRIOITY LEVEL,T, AND COND CODES 
XOR RO Re ~ 
BEd es +a USER MODE REG. SET #1 ON 
XOR Hi Re . 
BEQ 3s a ;SUPER MODE REG. SET #1 ON 
BNE RTI2EX 


; TEST THAT RTT CLEARS BITS 11,12,13 & PRE PERNEL HODE LEVEL Bits IN 7h KERNEL MODE 


MOV &-1 
MOV 8, aeeapete SELECT Re REG. RE SET i 
CLR Rl2 
MOV #PRe, -(SP) 
MOV pc, -tspP) 
add #1$-., (SP) ;FORM NEW PC 
1S: MOV Q4PSH, RO ;NOW USING REG SET 0 
TST Re : TEST Re NOT R12 


FF? 


TESTS THE Eee SOTER THE TRTY OUT al OF Psi 


4S: CMP #PR2, RO 
BEO RTT2EX 
sERROX! INCORRECT PSW AFTER THE RTT 


30 





RTT2EX 
TES. TO INSURE THAT RTI DOES NOT CLEAR BITS 11 1S IN USER MODE 
2s: Bis SPUM+PR7,a8PSW  ;PSW<15-5>=144 
(SP) 
MOV (SP 
#5$-., (SP) 
R sATTEMPS TO INSERT A OF 0 
S$: SUM+PUM+REG#PR7, 2#PSW SHOULD CHECK AGAINST REG #0 
' BEQ RTT2EX 
HLT ERROR! RTI CLEARED BITS IN PSW 
RTT2EX 
:TEST THAT BITS 11-15 AND PRIORTY BITS ARE NOT ALTERED IN SUPER MODE 
177776 38: ~° BIS 8PUM+PRY, DePSW  ;PSW<1S-5>=044X 
MOV #PR7,-(SP) 
a Pe 
ane ' ;ATTEMPTS TO CLEAR 11-15 AND ALTER PF 











0 
NOU £WlUE-O 





SEE 


++ 
> 
+ 1 {vt Witt tt t 
A A 
_ 4 











177872 177776 


bees 


0c00S3 001202 
000001 154340 


001512 


DE C= 14-DEQKC=8 FOP a4" 0. SPL EXERC TSOR a |) | Baa 

022737 074200 177776 &$: CMP #SM+PUM+REG+PRY, dePSW 

001401 

104000 
016737 

724 


BE RTT2EX 


HLT + ETPER MOE RTT a renee Tf 


RTTZEX: MOV SAVPSN, a8PSW 
RELES: SCOPE 
a MOV size PC GC RELOCATE PROGRAM CODE 
 SEEESsbose Last ADDRESS OF CODE TO BE RELOCATED SSSSSSSSSSS 
« SRERAESAEFRES SA OECK AN fate HL AO DIV ISTRTIOS 
CHE AND D1V INSTRUCTIONS 
gATEST 53 SEK ASH, ASHE, NUL, AND DIV INSTRUCTIONS axe 
téts3: eSTSTANM LOAD TE 
81, STIMES 3;00 1 1HERATION 


-SBTTL START OF SECT 
LGEGEGEEERSORE FIRST ADDRESS 10 BX RELOCATED Sescesese 


RELE: Mov RO 
a we 1 aa — THE ADDRESS OF REL& 
SuB 2 ‘RO SEATRACT SREY REL OcAT ON FACTOR 
MOV —- RL a#FACTOR “RELOCATION ACTOR 
HOV BC, <1WSLPERR OOP ADDRESS 
MOV nl 
fe NEXEC BR IF TEST CODE TO BE EXECUTED 
ASHLO: "OV a! {RO WILL BE THE SHIFT COUNT 
MOV 17. ,R3 ;MAX SHT 
ae ie ae 
MOV a RS 8 RY KILL ATA IFTED BY 
ASH "RS i oRire Re 
Move gaPSi, (PC)+ ; cc’s 
2s: - WORD conan ASH cc? sin EVEN BYTE 
3S: ASL 1 te iene ISHIFT a4 a 
ri se, (SP ‘Oreck IF Be oe Vv BIT 
30S: A tes + bepsu HREsTone OrxGrre ve oy 
$08 Re, 38 a SHIFT RY Re 
ene : tai eK Ash rire RESULTS 
cree $,28+1 ;CHECK ASH & ASL CC’S 
48: HL ; sERROR! INCORRECT RESULT OR CC’S 























oleae | eae 


142 
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ince Oceana Cees Se BS * 


<£ 


Reese en rSne ret pos eR EN ER PRR RRC 


05200 
Jeu 


001336 


Bisros 15768 
Dio7os 


177776 


au Re 


58 
: 


a} sess 


ooo 
pb pe 
& 


Bahn ee 


eae 
aa 


Ree | 
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;SET V BIT IN PSW 
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; INCREMENT PASS SHIFT COUNT 


ina SHY COUNT COUNT FOR PASS 
S$ 


{SHIFT RY Ye. Ties 
save afc? iL WILL [Nor set V ASR MAY SET V 
;CHECK ASH & ASR RESULTS 


;CHECK ASH & ASR CC’S 


;DECREMENT PASS SHIFT COUNT 


3PUT MAX SHIFT COUNT ON STACK 

;PUT LEFT aiet COUNT” ON STACK 

GET PASS SH 

CURRENT PC is oat, to BE sure 

3ASHC SHIFTS R4,RS;ASL,ROL SHIFTS R2,R3 


sSHIFT RY LEFT as SPECIFIED BY RO 
:SHIFT R2,R3 LEFT 
2AS SPECIFIED” BY RO 


;CHECK RESULTS 


REACHED Mh NEXT pose oo COUNT 
ACHED MAX COUNT (31.) 


RESTORE STACK PTR 


;PUT MAX RIGHT SHIFT COUNT ON STACK 
:PUT PASS SHIFT COUNT ON STACK 

*GET PASS SHIFT COUNT 

*R2,R3 & R4,RS ARE THE DATA REGISTERS 
:T0' BE ST EtES BY TEST 
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07 


atiy 

~~ 

sth 
7 


i’ 


os 
= 
- 
T 


ees 


oe - 


€ 


secohesennenses Peretrerrrrrtttiti titi ttre ttt t tte 


o000S4 d0le0e 


a 


se 
res 


Bib 


c 


: 
fy 


3 


+ 


1 





+N20°RS 


= 
a 


es 


82 


gore 


ne 
2 


be ied | 
3 


8 
S 


g 
cd 
aORias B85 org 


e 


MULTIPIER cng) = 100000 


a 
323F2R 
3? 


fel TEE G0 tenia 


a 


8 


Sune yevvey aves tecmeanan cametaenqaananaeaaar das 


Re wee 


obo 
£MO 
os 


S25 





;CHECK RESULT 


;SET SHIFT COUNT FOR NEXT PASS 
;CHECK IF MAX SHIFT COUNT 


;RESTORE STACK PTR 
ne mM fF pr oA od MULTIPLIES THE CURRENT PC 


S’ Moiribe tore pants A BY 
s THe RESUL CONDITION CODE RESULTS ARE NOT CHECKED. 
Weustisaebinsees SESE EEE Et 


sl 


RO CONTAINS MULTIPLIER FOR MUL 
5 (SP) TAINS SHIFT VALUE FOR ASHC 
: GISTERS 


su na] iticeg, ga aoe 
‘ae labelled 


MULTI YR BY 
;IN Tiras ny INR R3 


ara WILL NEVER BE = 0 
>*MULT RS i (SP) LEAVE PRODUCT 
is AN RS N RS 
i OhecK’ MSH RE 
;CHECK LSH RESULT 
s INCREMENT ASHC SHIFT COUNT 
MULTIPLIER 
Re = MULTIPICAND 


;SAVE MULTIPICAND 
CONTAINS ORIGINAL MULTIPICAND 


;R4 WILL BE MSH *PRODUCT’ 
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Pll CHECK 





SEEEEES SEES 


rary 


MACYLL 27(732) 
ASR 4 
COM RY 
MUL RO,R2 
CMP R2,R4 
CMP EF R3 
BEG 44 


Pag ty 
B ETC iT tla 
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sF ORM a 
inUCTIBLY R2_BY 190000 LEAVING 
ihe HSM, f= L5H PRODUCT 


;CHECK LSH PRODUCT 


oe ee 7 a 
IV NARS TRUCTION DIVIDES THE CURRENT PC 


BY 
R2/R3. NEXT THE QUOTIENT 


ie {REMAINDER IN 
ewKTECIED Bt REMAINDER ADDED. THE RESULT IS 
rae the 6 Here arent PC. 
ieoueeansenesevaneneeeanted EELESFELEARALELLHELELA RSS He ae RSSE 
Ove ess, sLOAD TEST NUMBER 
MOV #1,RO ;RO=DIVISOR 
MOV PC’ (SP) *SAVE DATA ON STACK 
MOV (SP), R3 :GET DATA 
CLR BS *CLEAR MSH DIVIDEND 
DIV RO,R2 sDIVIDE R2 BY RO LEAVING QUOTIENT IN R2 
AND REMAINDER IN R3 
BCS 2s 
BMT 2s 
BvC 20S : IF DIVIDE 
CMP $1,RO ?V BIT SHOULD ONLY SET IF DIVIDING BY 1 
BNE 2s "AND THE LSH OF DIVIDEND 
BI $100000,(SP) IS NEGATIVE 
BEQ 2s 
BR 3$ 
MOV R2,R4 GET QUOTIENT 
MUL RO, RY ?MULTIPLY QUOTIENT BY DIVISOR 
ADD R3,RS ADD REMAINDER TO LSH PRODUCT 
BCS 2s *SHOULD BE NO CARRY 
cH ($P) RS “CHECK RESULT 
HLT ERROR! DIVIDE FAILED 
s QUOTIENT Wy R2, REMAINDER IN R2 
ORIGINAL S ON STACK AND FINAL 
*PRODUCT IN R4,RS (MSHI(LSH] 
ASL RO GET NEXT DIVISOR 
BvC 1§ 
ASH,ASHC,MUL, AND DIV INSTRUCTIONS USING ADDRESS MODE 1 
: CLR ‘(SP} 3(SP) = SHIFT COUNT 
CLR RO RO = SHIFT T FOR CHECK ASH 
ar ne Stee 
MOV PC,R3 R3,R4 = DATA TO BE SHIFTED 
MOV R3/R4 
ASH (SP) .R3 sSHIFT R3 LEFT (SP) TIMES 
MOV aePSH, (PC)+ >SAVE CC’S 
.WORD O ;CONTAINS ASH (SP),R3 CC’S IN EVEN BYTE 
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TSS CHECK THE DIV INSTRUCTION 


sAND ASH RORY CC’S IN ODD BYTE 
ASH RO, RY :SHIFT RY LEFT RO TIMES 
177776 177767 JsPSW, 2S+1 “SAVE CC’S IN BYTE OF 2$ 
: MP R3,R4 Soba Be T 
3 : BRANCH IF HEY DO NOT COMPARE 
177756 177755 e$,28+1 :CHECK CC’S AFTER ASH INSTRUCTIONS 


34 HER RESULTS OF Fad OR 


SS ea 
IFT COUNT FOR ASH (SP), RQ 
MAX SHIFT PT COUNT 


wa" 


Be ee 
rts) 
a 


fs 
B~ 
ae 
nn 

3 


: 
on 
BG & 
8 


te 
oe 


2 
nN 


SP) 
f 


MAX 


& 


au 
= 
i | 
+e 


3( 
sR 


> 4 


naw 


: 
On 


DATA TO 


SP).R4Y CC’S IN EVEN BYTE 
cc's IN 00D BYTE 


a2 
me 


Re 
a8 
~DBBLEB 


S 
Be 


_- RESULT CC’S 
Bio nor Conran RESULTS OR RESULT CC’S 


~ 

a 
& 
= 


: 
go 


= 
a’ 
7 
= 
= 


be 
—f0o" 


' he FOR MAX RIGHT SHIFT 


~ wages 7 a Ec 


IV VIDS 8 
CHE ie DIVIDE I TION BY DIVIDING 
SSR DR FFD. Ur UIT BRR. o 
s snusunctantantcesereccuncenssdedenenbetsesucersesheereGnnues 


tétse: Nove. #56, 0eSTSTNN sLOAD TEST NUMBER 


DIVi: PC,R3 3 CURRENT PC IS LSH DIVIDEND 
fle ihrise OO 
ON fack 


aT 


& 
Peon PBGAaEE 522 


BBR GRAGBBS | 


aouenseauay. 
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DEGKCB.Pil DIVIDE 


2 
ae 
6479 
Bs 
i: 
e 


SaSeaRae 


SEER Eee RS aana rae 


Neww-o 


Cs 


1 
i 
1 
1 
1 


; 


=) 


om 
Vs] 


ERERERRRE 





os oe 


2HBRS KF 


Sr 


Bao fo Gam fs bo fe Bs Be pee —) 


ZIFERENE ESR 


4 
rere 


= 


ee on ee 





TS6 


mene 


“~ 
<= 
1c) oo 
Cs 


-— 


: 


8 


awe 


Sees 


000057 001202 


ee 
°o 


fot a ;CHECK QUOTIENT (Re = 0) 
MOV Rat (SP) ;GET origi. DIVISOR 
om Ra, (SP) ;CHECK REMAINDER 


es: HL ;REPORT ERROR 
IISiistiitiii liter iti reeiietitttititititititiiitttitt tit t 
;*TEST C INSTRUCTION 

5. AE AE 9 A SS SE EE 


téts7: HOVE. 857, auSTSTIN “LOAD TEST 
SPLTST: HOV £PC)+,R2 ;R2 CONTAINS OP CODE FOR SPL 7 
LR RY 
IC 8PR7, -(R4) sCLEAR PRIORITY LEVEL BITS IN PSW 
MOV (R4)°R3 GET CURRENT PSW 
BIC #177757,R3 :R3 CONTAINS CORRECT PSW AFTER SPL 
MOV sSPL+0, 25 s INITIALIZE SPL INSTRUCTIONS 
MOV #SPL+7,S5§ 
ee ee ST RORTORTTY TEVEL TROTE: SPL=NOP IF USER/SUPER MODE) 
, CHEB (RW) JR *CHECK RESULT an ABOVE 
HLT ‘ . ' FAI 
BIT #UM, (RY) PROT Faken RODE THEN SPL 
ae $0 R3 OEP NERT rer CT PSW RESULT 
3S: INC es ie HET ext SPL INSTRUCTION 
st is’ OOP UNITE BONE CHANGING SPL EACH PASS 
MOV (PC)+,Re iol CONTR INS SPL INSTRUCTION BELOW 
Br #17,R3 ITION CODE RESULT INTO R3 
4$: Sct ets i a 
S$: 
C (R4),R3 
BEQ : 
HLT PROVE F FAILED 
BIT aur, (RAD rk IF IN KERNEL MODE 
Bt a ;SET NEXT CORRECT PSW RESULT 
6S: Bec >SET NEXT SPL 
. 2S Re ;CHECK IF DONE ALL SPL’S 


7 agama ebay 


ee ay RAT RO TRPERRUPT FRES PI ACE AND 
T WHEN A AT A LeveL 1 GREATER THA CURRENT PRO- 
japeesnieusncenneesecayvesateasesanvens enreedeeesenenaceatety 


juan Ho #60, J8STST sLOAD TEST 
PIRQO: MOV #4S,RO ;RO POINTS TO A TABLE OF CORRECT PIR 


‘ 











io 11 
Pil 


SSE SEL ELEL LLNS 
TiS SERee Te 
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;CONTENTS AF whe AN INTERRUPT 


000400 MOV 8400, Re ie eONTaINS aT REQUEST LEVE 
CLR R3 PROEE IORITY EL 
177772 MOV 8PIRQ,R4 *RY RODRES OF PIRG REGISTER 
CLR (R4) SANT TALE REQUEST LEVEL TO O 
177776 oo00242 MOV JePSW, DHPIROVEC+E sRETAIN & REG SET ON TRAP 
000340 o00e4e MOVE = #PR7, daPI 7 BSSUNe LEVEL 7 ON INTERRUPT 
oo0340 000016 MOVB aPR7 aBTBITVEC sBRIOR TY ON TRAP 
1$: MOV #2$, J8PIRO SET PIRQ INTERRUPT VECTOR 
001506 000240 ADD JSFACTOR, JNPIROVEC $800 Re RELOCAT QCATION | FACTOR 
1 MOVB 3, a8PSW TY LEVEL 
| BIS : (RY) : MAKE east ST AT LEVEL = TO CP LEVEL 
oo00002 onc240 R00. 438 -2$, 2#PIRQVEC ' ;SET PIR INTERRUPT VECTOR TO 3$ 
BIS Re, (RY) ;MAKE REQUEST AT LEVEL 1 HIGHER 
2s: HLT sERROR! EITHER AN INTERRUPT OCCURED 
WHEN ROST LEVEL = CP LEVEL (PIRQVEC)=2$ 
OR INTERRUPT FAILED (PIRQVEC)=3$ 
3S: cHP (R0)+, (RY) *CHECK CONTENTS OF PIRQ REGISTER 
177772 001276 MOV JSPIRO, JeSTMPO ;SAVE PIRQ 
— Ge o4PIRQ’ RROR! T PIRQ CONTENTS 
000040 6S BoD #40, R3 tam Rex? GP PRIORI HY LE 
MOV pee LEVEL RETUR N SOORESS 
arta ADD nis cae) (SP) sAGIUST 
30S: RTT 
“TABLE OF CORRECT PIRG REGISTER CONTENTS ON INTERRUPT 
dg: 1042 ;PIRI+PIAl 
3104 *PIRO+PIRI+PIA2 
7146 sPIRG+PIRe+PIRI +P IAG 
17210 ;PIRY+P TRO+PIRI+PIAY 
37252 sPIRSSPIRNEP TRP IRE +PIRI+P OG 
77314 :PIRG+PIRS+PIR4+PIRS+PIRO+PIRI+PIAS 
177356 :PIR7+PIR5+PIRS+PIRY+PIR3+PIRO+PIRI+PIAZ 
SS: CLR ;CLEAR PIRQ REGISTER 
o00242 000240 MOV sPIROVECI, DePIRQVEC RESET PIRQVEC TO HALT AT PIRQVEC+2 
MOOS tE Kt Re 
000340 000016 BIC QSTBITVEC+2 
: cennientt imme tonahionktastiabacmeasueeninumnmemmaienennint 
titest el CRO; BREAK 
iH THIS TEST SHIFTS A 0’ BIT BIT POSITIONS. 
RESLSURESRELE ARE RELERRSSLELSSER SHALES EAA UESER EEK ES 
titel: MOVE #61, a8STSTNM sLOAD TEST 
MBRK: nov ve CRO BREAK REGISTER 
MOV the uf tee 0B TG cont rents 
MOV 6.RO *SET DATA one 
1S: MOV RO, (Re) - *LOAD REGISTER WITH PATTERN 
CMP (R2),RO AND CHECK 
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. CHECK MICRO-BREAK REGISTER 


Be 


es: 


3$: 


fh 
vs 
~ 
~~ 
ae 


ae 


See: 


—- 


Enemies lei 


£ 


_ 
— 
o 





2 
uses E 


EES EERE ELE ERE ESD PEEPE ED PEENEPE SHEN 


BNE 3$ s BRANCH, IF INCORRECT 
ROL RO . See IFT DATA 
San 
HLT sERROR DATA N RO NOT IN UBREAK REG 
BR I * CONTINUE rest 

(R2) *RESTORE ORIG UBREAK CONTENTS 


48: MOV (SP)+ 
Fh 1d tela 3 7-1-7 k-th 
j #TE 62 CHECK MFPI/MTPI INSTRUCTIONS 
:SEREMEEAEAEAEAE SEERA EESESUHOEAESEESNSEESEEREREAEABESESEAEAIAIER 
#62, d8STSTNM ;LOAD TEST NUMBER 


MPI: BI 8UM, J8PSW sKERNEL MODE? 
BEQ ENDCP YES EXIT TEST 
MOV PC (SP) : 
noY (SP)+,aaMMVEC  ;SET MEM MGMT ABORT VECTOR 
CLR =(Sb) CLEAR CHECK WORD 
MOV *=(SP) ;PUT ADDRESS OF CHECK WORD ON THE STACK 
re aBhON * CHECK IF nen MGMT IS ENABLED 
MOV SUIPARO sustrenl” 7 ;SET UP USER PAGE ADDR. REG. 
MOV #6006 , S#UIPDRS >SET USER PAGE DESC REG R/W UP & PAGES 
NOV Ses IPARO,@ESIPRRG T SUPER PAGE DESC. REG 
10S: R00 #140000, SP *SET CURRENT MODE’S STACK POINTER 
AOD eg ep) 
HOV (SP)4; O8IOTVEC ‘el, 197 TRAP VECTOR 
Ne (SP) Hs CK WORD 
T ! MEPI,MTPI FAILURE-FOR SETTER 
BS Bs if SOLATION Ste RUNNING MFPI DIAG. DCKTDVE 
NOP R OR SUPER MODE 
rer (SP)+ seer DATA (AN ) ON ORE MODE’S STACK 
MFP a(SP) TA =0) fie? NODES APOCRESS 
BNE 45. ioe IF WARENT ‘burp HAVE A ZERO ON THE STACK 
MTP = @(SP)+ sFOP 6 OFF, STACK AND MOVE 
RT! : URN TO Inst FOLLOWING IOT ABOVE 
CCRB = aePSW ORITY LEVEL BACK TO 0 
: MOV eKTABRT, SMMVE T pas ver 
MOV #SSCOPE, J#IOTVEC 


MOV ;RESTORE STACK POINTER 
ipeeegepsosnonensauensetssensnnehascesssnseasensesscseunnnneuau 


GAL HALT 
3 9 9 9 a a EH 


001202 use MOVE #63, a8STSTNM sLOAD TEST 


: 
: 











sid 
a 
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wa 


oo 
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pis Gaessew) «Gs ES 
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(SPD GET CURRENT PC 
(303 ORR. i ‘P6n0 AD RESERVED TH 1 hee pETOR 11/40) 


MODE 
BRRORY. HALT ABOVE FAILED IN USER/SUPER MODE 


3$ 

PC, (SP) REPLACE TURN PC PC WITH 

#3$-., (SP) ADDRESS hake BELOW 
RETURN (TO 3) 


#ERPRT, QHERRVEC ;RESTORE ERROR TRAP VECTOR 
SRESERR, DERESVEC’ 


33 os ah aga oo ge eg pe opt sO aa rcpt 
ETiiiiiitiiiiiiitiiittittiittitertiterttttitiiiierecerr reg 
Te4: MOVB EST NUMBER 


864, J8STSTNM sLOAD T 
JePSW,RO GET CURRENT PSW 

a4PSH, RO ;CHECK THAT PSW UNCHANGED BY RESET ABOVE 
. sERROR! RESET CLEARED MODE BITS IN PSW 
RO, a8PSW RESTORE PSW (FOR ERROR) 

PC, Re 

#12, Re 

#RELOC, PC 3GO RELOCATE PROGRAM CODE 


0 
TESEEEGGEbbODS LAST ADDRESS OF CODE TO BE RELOCATED GEGEEEEEEEE 
STREP int Reels 


TEST STACK LIMIT REGI 


j SHRHOASSROEERESSESEEELEUEEOOREOEEGIGHINNESEEEEEESHEEHEHEEEEEDE 


#65, 8STSTNM LOAD TE 
#1 iystines 3300 1 1HERATION 


sc 
grrrenigari? Fie Flr ADRESS 10" Be RELOCATED 777777777 


w 
—~4 


SSSeEeS42 ie 


4 
w 
“4 
o 


SNe & 





: ee 1 isvenas ™ THE ADDRESS OF REL7 
, 
RO" SREACTOR Serv eva PGR 


aban Peme  fabnUst™ 


#SCPERR, J8SL 
SNEXEC :BR IF TEST CODE TO BE EXECUTED 








START OF SECTION 7 


ooo ooo 
3 


be 


A et Bes 


-— 
oO 
MC) 
-OW 


-88 
— 
=: 


Cs 
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; THIS mg — acter ig ay THROUGH ALL BIT POSITIONS 


ANY INTERRUPT 2 FROM OCCURRING 
MOVE TO STACK LIMIT REG 
RESULT 





TKLM DRES 
Me: t 2)+ VR ; CLEAR stfen LIM ait Ree 
BIT #20, (R2) sEXIT TEST IF ’T’ BIT IS SET 
BYE 1s (Re) sSET PRIORITY LEVEL 7 TO PREVENT 
#4 SET CHECK DATA 
1$ MOV RO, -tR2) 
cH (Re)+,RO AND CHECK 
ee sERROR! STACK LIMIT DID NOT 
ica CORRECTLY. 
Bee 1$ “LOOP Tint 1 TAT cureTs OUT 
CLR =(R2) ‘CLEAR STACK LIMIT REG 








;THIS TEST CHECKS THAT A PROPER ’RED’ ZONE VIOLATION OCCURS, NOTE THAT 
:NO RED ZONE’ VIOLATION WILL OCCUR IF IN USER/SUPER MODES. 
A RED ZONE VIOLATION THE C UIE AN USER/SUPER HODES. 5 an 
?AND TAKES THE NEXT INSTRUCTION FROM PC IN LOCATIONY. THE INST- 
sRUCTION, CAUSING THE RED ZONE VIOLATION 15 *ABORTED’ . 
ROY aig (SP) ¢ Peon TRAP EcroR 0 4S BELOW 
MOV sepa’ C+2 are CURRENT STATLS ON TRAP 
MOV PC, (Re) ise STACK Lint LIMIT TO TRORRENT PC 
MOV (Re), SP STACK PTR = STACK LIMIT REG 
MOV SP.R3 sae STACK PTR_ 
MOV —-336(R3),RY ALD ge LOC CONTENTS 
Bossa uF IN wef, POE 
MOV RY, 336(SP) ait NOT CAUSE TRAP 
BR tobe . 
20$: CLR 336(SP) ;SHOULD CAUSE *RED ZONE’ TRAP 
3S: MOV TK, SP *RESTORE THE STACK 
HLT ERROR! FAI 
4g BIT #UM, a82 ;CHECK IF TRAPPED WHEN IN USER 
MODES a CONTAINS OLD PSW) 
— ws a a 
BNE 35g sgieek BTR thn CALL IF "NOT o 
CMP 336(R3),R4 ; CHECK T INST WAS ABOR 
BNE 9 T ERRPR 
cs: cL &R d. iC R STACK LIMIT REG 
ADD #3$-. RS ts 
CMP RS, (SP) CHECK THAT RETURN PC IS ON 


;THE STACK (AT 0) 





CORRECT RESULT 



















027342 


eas esabenne? 


+ | dommmoraaseraasin’ de 


START OF SECTION 


001406 


eet st POP 11/70 CPU penton 


001202 


= 


100S: 
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100$ 


(R2) 
R4, 336(R3) 
#SUPSTK, SP 


rye 336(R3) 
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;EXIT TEST 


;CLEAR STACK LIMIT REG 
;RESTORE MEM LOCATION 
’ 

;RESTORE_MEM LOCATION 


Pe a 


SET PRIORITY LEVEL BACK TO 0 


#ERPAT, JHERRVEC RESTORE ERROR TRAP VECTOR 
SHERRVECH2 

#BIT4 é GERRY See 

asCPUERR sCLEAR ERROR REG 


1018: 
pret ce MEMORY MANAGEMENT ReGigTER Teeia 


i kTE MORY MANAGEMENT REGISTER TEST 
it “Poe TEST. - atts sI WRITES 64. RANDOM #’S INTO EACH PDR REGISTER 
S ENABLED ONLY PDR/PAR PAIRS 3-5 ARE TESTED. 
vasuenntcetiaatbarinentnakintaatetialetasctunsusseeteelotanie 
queens MOVB , aS TSTNM sLOAD TEST NUMBER 
KTPDR: MOV #PORTBL, R2 ;SET TABLE ADDRESS OF PDR’S 
MOV #100360 *SET BIT MASK (11745) 
1S: MOV (R2)+,RO GET PDR $s 
BEQ 100$ EXIT ON °O? INA 
2S: MOV #8. , (SP) *SET LOOP (FOR 8 REGS) 
ISTB Santon sam IF MEM MGMT D 
ADD #6, RO 
MOV #3) (SP) imo Q init TO TEST 3 PORS 
3S: MOV #32. ,R3 
CLR RY NA Esp Thale TO BE WRITTEN 
4§: BIC RS, RY rae BITS 
MOV RY? (RO) tERITE 
CMP (RO), RY AND C xe A READ BACK 
BNE 99$ 360 TO CALL 
COM RY °C DATA 
BIC RS,RY *CLE -SETTABLE BITS 
MOV RY? (RO) s WRITE COMPLEMENT DATA INTO POR 
CMP (RO), RY BNO CHECK 
BNE 995 GO TO ERROR CALL 
ADD R1,RY STEP DATA 
S08 R3.4S 
cs: CLR (RO)+ ;STEP TO NEXT REGISTER 
DEC (SP) *DECREMENT REGISTER COUNT 
BR 1$ GET NEXT SET OF 8 REGISTERS 
99S: HLT ERROR: INCORRECT bara READ 
tBOR IS IN N ROY DATA erie 
BR cs STEP TO NEXT REGISTER 
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DEQKCE.P1l T&6 MEMORY MANAGEMENT REGISTER TESTS 








6810 O27550 
pai : 77 ans” maemo 
<: 1s TEST - Tie TEST WRITES 64. COMPLEMENTING RANDOM aS INTO EACH PAR. 
bB14 Serica rntrrc re aitien 
eee 000067 001202 its #67, 28STSTNM sLOAD TEST NUMBER 
B81 bata 027704 KTPAR: i #PARTBL, R2 sGET TABLE ADDRESS OF PAR’S 
at 18: MOV (R2)+,RO GET PAR ADDRESS 
6820 14 BEQ 100$ EXIT ON ’O’ TERMINATOR 
23 MOV #8. . (SP) SET LOOP COUNT (FOR 8 REGS.) 
iss i318 gunhon *BRANCH IF MEM MGMT DISABLED 
b824 ADD #6,RO ;SET RO TO PAR 
MOV #3) (SP) ? AND LIMIT TEST TO 3 PARS 
B8eb 38: MOV #32. ,R3 SET DATA 
CLR RY sINTIALIZE SATA 
B62 4S: BIC RS, aie | NON-SETTABLE BITS 
MOV RY’ (RO) WRITE INTO PAR 
6830 CMP (RO), RY 
ue BNE a9 ie theo ERROR EXIT 
RS,RY AR NON-SETT T 
Bie Ba’ oy are RON SETIABLE. BI . 
6835 CMP (RO), RY AND CHECK 
B83 BNE 99$ iT EXIT 
Ri,R4 :STE 
beg SOB R3,4S LOOP ONTIL FINISHED 
6840 S$ CLR (RO)+ 
684 DEC (SP) sDECREMENT REGISTER COUNT 
BNE 33 BRANCH IF 8 REGS NOT DONE 
684 BR 1§ 
Peue 99S: HLT s ERROR! NCORRECT DATA READ BACK 
BEY *FROM PAR. ADDRESS OF PAR IS IN 
684 RO, DATA IS IN RY 
BYE serees 000772 ca BR DO NEXT REGISTER 
pest p00416 oF os :GO TO NEXT TEST 
6851 “TABLES FOR PDR & PAR TESTS ABOVE’ 
a PDRTBL: . 
;CHANGED TO 'O’ IF 11/40 
74 172320 


; TERMINATOR 


;CHANGED TO ’O’ IF 11/40 


i) Hess © 


FEREEIEINIDE 
es 
S558 S588858 





eee teas POP 11/70 CPU EXERCISOR 


QKCB.P1l 


PPLE ERE r etn ent eral Lit pit Se AER EHERSL Ada: 


o 

OO 

T= 

NOU SW O 


ietatetatetnto 


T6? PAR TEST 


027720 000000 
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-WORD OQ 
ATEST FO CHECK KY PORT COT EEE 


| TREE FH LSP GU BRL CPER PTS BRITE on 


an6054 000070 001202 sitsee Nove #70, a8 
105737 001503 KTABT: TSTB dsMMON 
001515 BEQ KTEX 
172 CLR JeKIPARY 
17 CLR 94k TPORY 
1 CLR #UTPARY 
17761 CLR JSUIPORY 
1 CLR asSIPARY 
CLR aSI 
j 1S: MOV aRIVEC -(SP 
1 MOV C42, =¢ 
LE ooo a et 
l MOV (SP)+; JaMMVEC 
13737 177776 000252 HOV “pager F 
1 MOV R2 
1 100000 MOV #160000, R3 
4 2 MOV -(R2), (R3)+ 
1001 BRE RO 
mie ay 
BR 100$ 
:ABORT HERE 
4g: MOV QsePSW,RO 
SWAB = séRO 
Bie R769? RO 
ob SOOBIL RD 
BNE 99$ 
MOV #25, RO 
a 
MOV #362, RO 
CHP RO, dASRI 
> Bhe 
CMPB «RO, #SRI1+1 
mY wo 
«e mi, 
a 99$ 
“ENTER HERE ON ERROR 
104000 $95: HLT 
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; TERMINATOR 


 HENUDGUEEELALEEEGSSaEEEEEEEOSoEOED TESS reeEs LEEEEEERRELEEEEEE 
MOVB NM ST NUMBER 


3L 
s 
;BRANCH IF MEM MGMT DISABLED 


96 UP MEM MGMT REGISTERS 
REPEC Is IF _A MEMORY 


TO 
1S RTUBL BETWEEN 
;SAVE MEM MGMT VECTOR 
: AND PRIORITY 
ise L nen Nan TO 4$ BELOW 
CLEAR. ABORT BORT INDICATOR 
:SE 
: THE REF Vi VIA R3 CAUSES THE 
sO IF THE ABORT OCCURRED 
;REPORT ERROR 
;SRO SHOULD CONTAIN 
:CAUSE FOR ABORT AND 
*ALSO WHICH SEGMENT 

N WHEN ABORT 


;GET ADDRESS OF INST THAT ABORTED 


;THAT ABORTED 
a eal 


ee ouness OF INST FOLLOWING ABORT 
; 


; RETURN 
;REPORT ERROR 











SYNE NEGKC-8 POF ) CPU EXER UR c wU - s) 
DEQKCB. PL! ‘ CHECK KT ABORT LOGIC 
3 030144 010716 mov  —«-wPC, (SP) 
030146 062716 177664 ADD #3$-. , (SP) 
1se 909002 os RTI s RETURN 
158 alee? Sree 100S: iy Est aun re sRESTORE ABORT VECTOR 
164 1 1 177572 we MOV T anar if EGR ERROR CONDITIONS 
: iret 7] MAPPING REGISTER TEsia@ 
ATE MAPPING REGISTER 


TESTS 
:% a TEST LOADS RANDOM #’S INTO EACH MAPPING REGISTER 
emer asa go ace ET eit: 









030172 112737 000071 001202 ith MOVB #71, a8$TSTNM sLOAD TEST 
Neen QO00040 172516 I aBITs aaMMR3 =; IS_ MAP on 
b3021 601053 BNE AP THO BRANCH IF ot® 
le Ol 170200 MAPTST: MOV ariAPL RO ?SET ADRS IRST MAP REGISTER 
16 Ol 00 MOV Tk, SP SETUP T 
1 1 MOV ti (5P)’ SET BIT FOR MAPLO <15-01> 
6 ] 00 MOV #177700,Re ;AND ALSO FOR MAPHO <21-16> 
030232 O01 boo 1$: MOV #32. ,R3 *SET DATH C 
6942 CLR RS *SET INITIAL DATA 
0s04 2S: MOV RS. RY ;GET DATA 
1604 BIC (SP) RY *CLEAR UNUSED BITS 
10410 MOV RY, (RO) ; LOAD DATA INTO MAPLO <15-01> 
1004 CMP (RO) RY >CHECK DATA 
001 BNE 935 *BRANCH IF INCORRECT 
030252 1 COM RS ;COMPLEMENT TEST DATA 
pa254 10508 MOV 25.4 ;GET TEST DATA 
1 BIC (SP) RY AR UNUSED BITS 
10410 MOV R4, (RO) ;LOAD COMPLEMENT DATA 
1 CMP (RO) , RA ;AND CHECK 
BNE g 
my HEF IRIE Ban 
Gaoere BIC R2;R4 eek EB BI i 
10410 MOV R4? (RO) OAD TEST BATA: INTO MAPHO <21-16> 
03027 CMP (RO), RY ;AND CHECK 
BNE 
fee BIC R2,R4 LEAR GNUSED BITS 
1 MOV R4; (RO) ieee TEST DATA 
ig CMP (RO), RY AND CHECK": 
{ AOD Bee RS ORM NEXT TEST DATA 
TS =ihQ) SET PT PTR TO REGISTER <15-01> 
i xr 
hence 12202 ap (RO)+, (RO)+ = i Next REGISTER Paik 
170400 CMP #MAPLO+128.,R0 ; F NOT LAST PA 
ed 
1 TWO 
030336 104000 99S: HLT jERROR! INCORRECT ATA READ. BACK 
HIN RO, GOOD Gath ist NRG 
030340 005737 001504 MAPTWO: TST a#QV bad OR’ AUTO-ACCEPT? 


































Beseba MNUSRE NSE eae cse Ses eRRe Ros 





000072 
000001 


38 
=e 
row 
roe? 


bs te 
rm 
ta 


88 B8888 
rit aaa = 


e+! 
a 
<x 
br 


eet Th POP 11/70 CPU EXERCISOR 
DEQK MAPPING REGISTER TESTS 


ae 
Bs 


170204 


001202 
001316 
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RELE? ;BRANCH IF NO 
pyle @eMAPL1 ;SET MAP 1 INCASE ACTI1 


PH 
aeMAPLO 
JeMAPHO 


Ware Re 
aneLOC, PC 


;GO0 RELOCATE PROGRAM CODE 


REL77:_ _ . WORD 
37777777777777 LAST ADDRESS OF CODE TO BE RELOCATED 77777777777 


aaa. aati beet eae 


sATE 


Gr: Se he oh Bh he Oe Oe 


i T72: 


REL 


100$: 


89 fae 
EACH SECTION EVALUATES. A iBYrFeRENT E6L EQUATION AS DESCRIBED BELOW: 


SECTS 





FLOATING POINT TEST 1 
THIS TEST TAKES TWO RANDOM NUMBERS ( 


(A+B) #¥2=AKL+2RAXB+BERC 
yt ce 


p SESHESHUSRUSEHESRESHEESENSREREREESE SENS SERESO RSENS SEES REESEEES 


;LOAD TEST NUMBER 
;SET ITTERATIONS TO 1 


ON 8 
O BE RELOCATED 888ssesss 


;GET CURRENT PC 
: SUBTRACT Catan doe FACTOR 
SAVE RELOCATION FACTOR 
jSET LOOP ADDRESS 


;BR IF TEST CODE TO BE EXECUTED 


RE 
#FPOPT,d#OPT.CP ;FLOATING POINT AVAILABLE? 
100$ ;BRANCH IF YES 


MOVE. #72, a8STSTNM 
MOV #1, QNSTIMES 
.SBTTL START OF SECT 

-gggesesessess FIRST ADDRESS 

8: MOV PC, RO 
TST -(R0) 
MOV RO, J#FRSTAD 
MOV PC; RO 
SUB #.,RO 
MOV RO, a#FACTO 
MOV PC: J4SLPERR 
ADD #30, J#SLPERR 
MOV J#SLPERR, JUSLP 
TSTB  @#NEXEC 
BEQ 
IMP LE 
BIT 
BNE 
IMP +2 
JSR PC, J8FLTSGL 
LOFPS 
tbe 6 gS TPS’ ACD 
NOV ieee fae 
MOV NSREGI aaSACO 
ISR FLTAOD 
MOV as Aa4sAco 


elise SuSREG2 





;GET_RANDOM OPERANDS 


sINIT FPS 

*LOAD A OPERAND 
sLOAD B OPERAND 
>SETUP EXTENDED 
EXPONENTS 

i PERF M ADD 
‘PERFO SQUARE 


save SOF THAR WARE EXP 


semen THE ADDRESS OF RELS 


Pa 








DEGKCS.Pi 





SRR RAPER ERIS ISAS IA SSeR UR RE ERE R aM UNNU DRM Se seRz eee 
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Nhe dee Bi aeT HAND SIDE GF THE EQUATION 


0 ieee 001402 roy ge$he »B8SACO :GET EXT EXPONENT 
: Bet 002404 Moy S4sac0, daSACL :S T OPERERD B EXT EXPONENT 
i me ye Refaiey ERE me 
> ; 
bi 001404 O01406 MOV Beh a asece 
*NOW DO THE 8x8 
172437 001302 LDE a ale ;LOAD 8 OPERAND 
es 1260 001402 NOV a 1,98$ACO ;AND EXT EXPONENT 
j 1402 001 MOV ae d8SAC1 
at ee opel ACS OEE THe RESULT 
eee 001404 001410 MOV BCL AAS saca : 
*NOW DO THE 2#B#A 
912701 001302 MOV Ri 
eu te ated, ita RE 8 Sone 
oe Bie RR RY ebb depey IMO ne en erat: 
001 JSR FLTMPY ;D0 THE MULTIPLY 
Ge fore savene Lor ef 040000, Aco *SETUP TO MULTIPLY BY TWO 
767 001 JSR PC; FLTMPY 3D0 THE MULTIPLY 
*NOW SUM THE RESULTS 
013737 001410 001402 MOV J8SACZ, IBSACO 
LOF AC3 acd GET RESULT OF 8x8 
~_o ie -ReaPi treo CET RESULT OF AeA 
1 901406 001402 MOV gusice assaco CO’ 
001 ISR FL ADD THIS RESULT 
174137 00131 STF j >SAVE FINAL RESULT 
01 001404 001264 MOV aeSAC1, a8SREGS 
“NOW CHECK BOTH SIDES OF THE EQUATION 
* CALCULATE He NUMBER OF CORRECT BITS 
:PUT LARGEST Bate OR B¥#2 IN SAC2 
023737 001406 001410 J8SAC2, aSSAC 
° eine ie BGE 18 A BRANCH IF SAC2 ALREADY HAS LARGEST 
1 001 001406 1S Sus ote ae ners Fy “cagA e RUNBER 
i at 001406 mee 20 5 OF RR C a HETHIN 2 
001 8STMPY, ACO if a3 RESULT OF LEFT HAND SIDE 
Mee ae saan WOR ae ‘pean 5D TRACT T HOW CLOSE THEY ARE 
tesa? OC icq 001404 SUB oceRe ,aNSAC] ; DIFFERONCE IN EXPONENTS 
“ACTUAL EXP’S ARE EQUAL TO 200 
001404 fre CS sacu OS EMA! ee 



















DEQKCS.P1 







1 
ll 
ll 
ros 031110 
031114 
311 
Sil 
ik ll 
7100 ll 
710 Batts 
3 031146 
7104 1154 
7105 pate 
fai 
7108 1 
7109 
7110 031204 
7111 031206 
7lle G31214 
7113 31220 
7118 031224 
7115 
7116 031232 
7117 pics 
7118 931 
7119 0312e% 
7120 Rick 
7l21 931 
7ie2 O3lebe 
7123 
71 031270 
ries O31e74 
fi rele 
7153 31316 
5153 
7 
3.3 
7133 a3 
718° O31 
7135 O31 





SaakeR = FSIRE 





ee ee ee en oe 


-\ = 
888 


Po 9 
eee 
£O 
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SECTION 8 


001406 


B8888 8 88s : 
> he wrurowre 

bee 

moana 


sane & 


8 88 88 8888 
2 Se BS See 


— 


001404 


001406 


001402 
001404 
001410 


MACY11 27(732) 


38: cre DeSAC2,a8SACL ANSWERS WITHIN ALLOWABLE NUMBER? 
SECT2 : H IF YE 
4§: E l : S ARE WR 
es ERREREERESEREESEREEESEEESEEEEEEEEEEEESESESEEESESEESEES ESE SEEEES 
StcT2: LOFP 
300 A+B 
LOF 38S TMPO, ACI sLOAD A OPERAND 
LOF aes TMPe, ACO :LOAD B OPERAND 
MOV aeSRE »g8SAC 
MOV gaSheG| 3 
ISR FLTADD ;ADD_ THEM 
STF acl Ace *SAVE IN AC2 
MOV BsSACI,asSAC2 ;AND EXT EXPONENT 
sNOW DO THE A-B 
LOF ars ,AC LOAD OPERAND A 
MOV SRE egal AND EXT EXPONENT 
LDF geSTHPe, ACD SLOAD OPERAND 8 
JSR eer g — ;SUBTRACT THEM 
sNOW DO (A+B)#(A-B) 
LOF Ace, ACO GET RESULT OF (A+B) 
MOV D8SAC2, J8SACO 
JSR PC. FLTMPY ;FORM THE PRODUCT 
STF ACL SsSTMP4 : SAVE feSuLT 
MOV @SSAC1,aeSREG2 ;AND EXPONENT 
sNOW DO THE 8x8 
LDF aesTHPe, ACD ;LOAD OPERAND 8 
LOF ana eet —_ 8 OPERAND IS IN ACO 
MOV QSSACO,aeSACL AND EXT EXPONENT 
a ae 
STF acl *SAVE RESULT IN AC2 
MOV aeSACI, aesAce 
sO DO TRE AAR sTHPO, ACD LOAD OPERAND A 
e 
MOV F asSAC1 z 
ISR pC ELTAEY 3 EXE THE MULTIPLY 
MOV 3 1,a8SAC3  ;SAVE EXT EXPO OF AxA 
NOW DO A##2-Bae 
LOF AC2, ACO GET 8*B 
HOY ashe QsSACD AXA IN ACL 
STF pel'5 ;SAVE IN MEMORY 
NOW COMPUTE neneaiteee 
CALCULATE THE NUMBER CT BITS 
-QaSAC2, a ;DETERMINE WHICH EXP IS LARGER 
Ser E , : H ‘3 AC2 LARGER 
MOV #SAC3,a8SAC2 ;PUT LARGEST IN AC2 
NE ri 
LOF ash ,ACO GET LEFT HAND SIDE 
NOV DeSREG2, a8SACO 





Cl 
IN-OCT=76 10:46 PAGE 146 











DEGKCB.P SECTION 
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104014 





be bP Fs bo pe 
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Basées 


88888 


— be be oe bo Fe Fa Pe Pe fo 


2 Rewes 


wu 

i bao 

£o 
38 
ue 
ate 


1402 
1264 


b= 0B 0 § a Po Bas Ba pe 


REKFSKON 
Bees 
8 sesssss 


SSSSSSSSssssssesesss 8B 


0 = 0 bo ps po pe 


Base 
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~ 

w 

on 
BSSsSssssss 


SSSREDS SOMO RECE 
enge5gee Sees 
qagemadaquugs 
8888 88888 


GRae Seve 
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% 
te 
a 
Get 
= 
s 


; : SUBST T 10 SEE HOW CLOSE THEY ARE 
om a ExT EXPORENTS EQUAL 
BPL le *RBKE SURE RESULT IS POSITIVE 
1S: CMP 8SAC2,d8SAC1  ;RESULTS WITHIN RANGE ALLOKED? 
BLE CT3 ?BRANCH IF YES 
ERROR 14 RESULTS WRONG 
©  SELFLLKEFFKKLKELELESSESS LEA KAA RSLS SSLSSLS SRSA LEAS LA AALS SEALE SES 
3: Ube »AC $ AND A 
hoy sgasees’aesacy 
MOV BSREGI  geSACO 
ISR »FLTDLV :G0 DIVIDE THEM 
JSR PC‘ FLTMPY ;MULTIPLY RESULT BY 8B 
STF ACI deSTMPY :SAVE RESULT 
MOV asSREG2 
LDF ACO ;LOAD OPERAND A 
mov aires cekecg fo AS TE UT 
MOV SESREGD’ seahee3 
JSR PC FLTSUB ;SUBTRACT RIGHT AND LEFT HAND SIDES 
SUB DeSREGO, dNSACL :SEE IF RESULT 0K 
BPL Pt : DIFFERANCE IS POSITIVE 
1S tap ee Sesnci TS WITHIN 2 BITS? 
7 BGT — + BRBNEH IF NO 
S173 ?:GO TO NEXT TEST 
2s: ERROR 14 RESULTS WRONG 
5; REREEEE EELEEEEASE SEES REAL ELELSELSREE SS KKRL SHELA ERRESLE REESE 
j TEST 73 FLOATING POINT TEST 2 
3% THIS TEST TAKES TWO RANDOM NUMBERS (A AND B) AND 
+ S THE RESULTS OF TWO EQUAL CALCULATIONS. 
is EACH at UA ES A OI ERENT EQUATION AS DESCRIBED BELOW: 
te T2 (A+B)#(A-B)=Axte-Bae 
it BGG (abacreiannse-ene 
2  SESELEERELKERZE SEES EELERSURESKSA LER ESE SEA KKERAER ERS ESSERHHRSEL ES 
+6173: Hove 873, 28STSTNM sLOAD TEST NUMBER 
MOV #1 s 
100$: JSR peg es the ;GET RANDOM OPERANDS 
LOFPS INIT FPS 
ter Thea’ iLO 5 
NOV GO;asSACl ;SETUP 
MOV G1. aeSACO ; : 
ae ope cg CETUP ACD TO 
MOV BCL AAC QeSACO. ; ORM THE SQUARE 
JSR FLTAPY 300 THE MULTIPLY 
STF SFLTMPO SAVE RESULT 
MOV DeSAC1, deSREG2 ;AND SOFTWARE EXP 








ate 
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iCGh0: OPERAND A 
EAD B EXT EXPONENT 


;EXECUTE THE MULTIPLY 
;SAVE RESULT 


sisidalalss 
B32 


INOW DO THE BxB 
LDF ;LOAD B OPERAND 
Hoy AND EXT EXPONENT 
ISR FL 3D0 THE MULTIPLY 
TF 1 AC :SAVE THE RESULT 


NOW DO THE 2xBxA 
HOV 


S8S8888 SS8oses 


Teena? 


1D Te 8 Seems 
*AND THE EXT EXPONENTS 


3;D0 THE MULTIPLY 
sSETUP TO MULTIPLY BY TWO 


;D0 THE MULTIPLY 


;GET RESULT OF B*8 
;ADD THE ‘eued 
;GET RESULT OF AxA 
;ADO THIS RESULT 
;SAVE FINAL RESULT 


2 308 
™ 


a 


ees 
. 


accengie 


TION 

CT is 

OR Bk#2 IN SAC2 
ey LSAGE ALREADY HAS LARGEST 
tor connect airs uN 2 
: RESULT POSITIVE 
LORD T OF LEFT HAND SIDE 

T HOW CLOSE THEY ARE 


iSrTuR BRET Bad ems t0 0 


;ENSURE RESULT IS POSITIVE 


aRAR 
“eo 
—~ 
ea 
28 


AtatA BR A 
2 FRESERBREA 
a 
oad 
=| 
3 


reas 
es 
7207 
708 
ze18 
fle 
Zels 
zie 
zele 
7221 
fees 
res 
7231 
fee 
en 
7236 
fee 
7239 
re 
fete 
ren 
7246 
feu 
fash 
i 
ree 
7257 


— + 
uJ 


o be 
“E 
8 














4 
, 


t=) 
aA 
& Ra BY S8 aS 






Sire) Side Coee) Mens Go 





Siok 
Wwrue-o 
R 
ise 
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FLOATING POINT TEST 2 


Stage 01404 3s: 


Fors & 


g 
2 


1 


8 88 
—— 


ponies 
1402 
001406 
001404 
001402 
001402 
001262 


001402 
001404 


001406 


001402 
001404 
001410 


001402 
001264 
001410 


001406 
0014 
081 


HOB 


NEG assAcl 
CMP gusace ,aaSACl sANSHERS UITHIN ALLOWABLE NUMBER? 
: Phe on (3 iRPe om ARE 
© KEEFE LKKAAESE REALE LERERELESA SELES LAE SAE RSA KEKE LERESEESLEKSKSSEE 
Se D; LOFPS #200 
: LOE G4STHPO, ACL sLOAD 8 OPERAND 
maf SeSRECO’ aveACl , ome 
MOV B8SREG1’ IBSACO 
ISR PC, FLTADD ADD THEM 
Rov BCL AACS  asace tBNOTEXY EXPONENT 
SNOW DO THE A-B is . 
LOF QeSTMPO, ACL sLORD OPERAND A 
MOV Gl’aesaco ’ 
ISR PC, FLTSUB ;SUBTRACT THEM 
sNOW DO (A+B)#(A-B) 
LOF AC2, ACO GET RESULT OF (A+B) 
MOV ae asSACO 
JSR FL FORM THE PRODUCT 
STF AC] SeFLTMPO = ;SAVE RESULT 
MOV BSAC, deSREG2 AND EXT 
NOW DO THe BxB 
8STMPY, ACO ;LOAD OPERAND B 
(OF SC Seapmep :B IS IN ACO 
MOV DSSACD, aSSACL BND ER D PaNeNT 
ie OK npr 'SAVE RESULT IN AC2 
MOV Lh ’ 
;NOW DO THE AXA poe : 
Rov SESne 0, g88000 ? ro 
MOV aeshCd aeSACl 
ISR pc cLTAEY s EXECUTE THE MULTIPLY 
as$ACl,aeSACS SAVE EXT EXPO OF AXA 
NOM DO Ax#2-BH#e 
Hy BE aseaco 185d Bac 
JSR ae FLTSUB . 
StF . acl TMP ;SAVE IN MEMORY 
MOV asSACl G3 
sNOW C THE RESULT 
; CALCULATE NUMBER OF CORRECT BITS 
cH gusAce, oaSAcs : TERNIN WHICH EXP IS LARGER 
MOV DUSAC3,a¥SAC2  ;PUT LARGEST IN AC2 
me a8 eet ey 
aasae 
LOF QeFLTMPO,ACO  §;GET LEFT HAND SIDE 
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7314 


sale 


7317 


7318 





SEU RS RAR NO RARE tana aes Soman aE RUaE ARTERIES 





Sromeoerecs (i Be 


032706 
032714 


013737 


063737 
171100 
2746 


001262 
1 


2 


0014 
001406 


seeds 
BERS 


—- 
ai 


sseese 
s Fees 


Be 
rang 
N 


001402 
001404 


001404 


001404 


001404 
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TSR Be rcs pee TRACT _T pee Tem CLOSE THEY ARE 
aFEES Sesaci HELE Ee 


; ACTUAL EXPONENT 5 ARE EQUAL 


g *MAKE SURE RESULT IS POSITIVE 
REE a. 
1S: CMP gSaCe, USAC! s RESULTS HITHIN RANGE ALLOWED? 
oR jl RESULTS WRONG 
©  SEELREKERSSEL SEAS KLARA ELA RSLS REAS LE RSKR LE ERSLAALEL ERLE LELELEEE 
SECT3D: LDF a8STMPO, ACI : OPERAND 
LOF aeSTMPY; ACO AND OPERAND B 
NOV JSREGO, 
MOV JsSREG1. a 
JSR PC, FLTDIV :GO DIVIDE 
JSR PC’ FLTMPY *MULTIPLY RESULT BY 8 
STF ac TMPO  ;SAVE RESULT 
MOV JESAC1, JRSREGC 
Be RETARD SRE Hoe or 
my ee SS, 
JSR PC. FLTSUB j SUBTRACT RIGHT & AND LEFT HAND SIDES 
28 as$REGO,asSACL ; E RESULT Ok 
1§ t PRSURE DIFFERANCE IS POSITIVE 
1S re gee saci 4 sRESULTS S WITHIN 2 BITS? 
BOER 16 EB Pru TS. WRONG 
BR RELEB : 


s seTTe FLOATING POINT FUL TIPLY ROUTINE ee 
- SBTTL FLOATING POINT MULTIPL 


iD RPMS PRU EP he te CTE ge 6 


5% 
se apes eta et ppen 


be Tmpy gesAcd #SAC1 
MULF MULTI 
MOV Be =(SP) RO _ON STACK 
JSR s Bur cont 

1S: RTS > RETURN 


s LRSLESLASKVSSL SUSE AX ERALERKSE SHELL RSERELRSLAEEK SLE KA EE LE FERSLSE 
*BTTL FLOATING POINT DIVIDE ROUTINE 
i THIS ROUTING DIVE te CONTENTS OF ACI BY ACO 

AND LEAVE N ACL. 


a sate nastanieiaseanesaneannsancesician 


rc Ro 


ite Sk eC, PC. OHEXPEXT GAL CL ATE EXT EXPONENT 


5p RERRELELELERALE RL EL ELE RLL ALLEL RARERELEARA EARLE LE RE EA LRRE REELS 












See a POP 11/70 CPU EXERCISOR 
FLOATING POINT ADD ROUTINE 
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g bees Gs 
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033040 
033050 
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033060 
033064 
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.SBTTL FLOATING 10 NT_ADD 

% THis hobs nie. ONTENTS OF ACO 10. ACL. 

2% ake 5 oy E T H il - s EN AD SO SUETHENT 

: OF meh Eu ose Ruch NON-ZERO NUMBER. 
Ccsamealtnuaptentatekeutonmabionttetansenticimarstaiemmanenail 


TSUB: MOV ;SET SUBTRACT FLAG 
FLTADD: i SeSAC0,cHSAC1 CHECK SOFTWARE EXPONENTS 


BEQ 2s 
eens) OR 1 IS gARCeR HAN ACCUMULATOR 0 


ds$ACl ;GET OPE B SOFTWARE EXP 
SUB d¥SACO, Re ;GET otra tee IN SOF TWARE EXP’S 
CMP Re, #57. SEXP WITHIN PREC RANGE? 
BGE 7$ BRANCH IF NOT REQUIRED 
NEG Re ;RESULT IS OPERAND B 
Leer ~ aes ;RELOAD THE EXPONENT 
78: LDEXP  %-75,ACO ;FAKE E SO HARDWARE 
BR es ;WILL DETECT OUT OF RANGE 


ACCUMULATOR 0 1S LARGER THAN ACCUMULATOR J 
{s: MOV #SACO, R2 GET SOFTWARE EXP OF OPERAND A 


SUB DSSACL, RO GET DIFFERENCE IN EXP’S 
MOV a¥SACO, d#SACI * MAKE oF WARE EXP’S EQUAL 
CMP R2,857. ;EXP WITHIN DBL PREC RANGE? 

BGE 4 ;BRANCH IF NO 

LDEXP Re, ,ACL RELOAD THE EXPONENT 


ACCUMULATOR 0 IS MUCH LARGER THAN ACCUMULATOR 1 SO RESULT IS 0 
dg: LDEXP  #-75,AC1 lt PONENT oF Rane 
2s: TST SUBFLG *ADD OR SUBTRACT? = 

BEQ § as *BRANCH IF 

Bg 
5S: ADOF RCO,ACL faa s EXECUTE THE ADD pa 

y JSR SaERPEXT CALCULATE EXT E Op ONENT 

3S: cLR SUBFLG : INET SUBTRACT FLAG 
SUBFLG: . , 
RELEB: Score 

ADD aie fe 
a oe Hoy, arel ;GO RELOCATE PROGRAM CODE 


" eeceaomes: Ie ADRESS OF CODE TO BE RELOCATED ssessssssss 
5. 9 8 9 9 2 9 EE 

: SATEST 74 TELETYPE AND CLOCK TESTS 

NE io et wee 


oo0074 ooi202 téT74: Move #74, a8STSTNM LOAD TEST 


Nee an ee - + ee 











PP rr 
Bove é 





r 
RZGRLS 


ee 
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TELETYPE AND CLOCK TESTS 


001806 
reat 


177570 


00 001470 


000204 
000200 


001525 
146026 


177546 


177776 


177724 


146042 
001270 


177742 


NUP 
MOVB gesrart. deSWR 
TTYCHK: 4 on RCTOR’ 


V sSET = CONSTANT 100 
BIT sTTOPT as0PT. CP BRANCH IF T 
1$ ON SYST 2 
JMP ARBFIN 2 JUMP IF 
1S: CHPB ie , aSTPS *CHECK IF ty IS READY 
MOV S-1, I8SREGS; SET OF ASCII STRING TO T 
AS oat ;SET ie git. SEE TPISR FOR INT SERVICE. 
WAI *WAIT FOR INTERRUPT 


fgg tt ARBITRATION LOGIC 


>THE BELOW TEST WILL INHIBIT INTERRUPTS ON LEVEL 6 AND ABOVE E {LOCKING 
OUT THE LINE CLOCK) AND THEN SET UP THE TTY TO INTERRUPT. 
*PRIORITY LEVEL WILL BE SET TO O ALLOWING INTERRUPTS IN wire casey 
“THE LINE CLOCK (AT LEVEL 6) SHOULD INTERRUPT BEFORE THE TTY (AT LEVEL 4). 
\s: BITS #20, 08PSW 
BNE ARBEX sEXIT TEST IF °T’ BIT SET 
2s IT Rd, aSTPS HA T FOR TTY TO BE NOT 
a nove #300, 24PSH CET PRIORITY LEVEL 6 
ae $3 dsr Fon nevov 
BIT -- #LKOPT,@s0PT.CP LINE CLOCK AVAILABLE? 
BEQ N i BRANCH NO 
MOV #7$, J8TPVEC T TTY VECTOR 
MOV #85; J8LKVEC >SET CLOCK VECTORS 
MOV #PR?, JSLKVEC+2 
CLR } sCLEAR CHECK WORD 
4§: WORD 
NOP 
NOP 
NOP 
MOV R4, JULKS 
S$: MOVE a(PC)+,RO ;GET CLOCK STATUS 8 BRANCH IF READY 
6S: gloRD LKS > CONTAINS SS OF L CLOCK STAT 
NOP AT THIS TIM BOTH THE CLOCK 
SARE READY TO INTERRUPT 


A cLock th eRRueT WILL OCCUR (8S) bends’ i RIORITY FRCRE 4 
"AFTER THE CLOCK SERVICE ea FRTERRUPT 
*ICE WILL SHIFT LEFT 4S. 


ED 
WILL OCCUR. THE TTY INT SERV 


sate SIRE EO 













DEQKC8.P 


ne 












r 
SSB IRR 





appara 





2 bo ee 
WO NOU £ WMH 


Raddaaaaaad 






CRSA ERNE RERRRR 


pote 


ie 


HY Ka 


a? 
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TELETYPE AND CLOCK TESTS 


0S261 
14 


000100 


000064 





8$: INC 4$ 
rey #LKSRV, J#LKVEC ;SET CLOCK VECTORS 
ARBFIN: MOV STPISR, d#TPVEC ;RE TTY VECTOR 
cu (astes™” ‘CLEAR fe BIT 


X: 
[eh peteenneneaegngeteterceceeetntnaee 


if TEST 7 ON UBE AND MBT 
TURN THE MASS BUS TESTER AND UNIBUS EXERCISER IF PRESENT 
SE Pee rier eee mr meer reer ert rr pe eeeerT | 


irene nove 875, JeSTSTNM ;LOAD TEST 


MOVE @&8STSTNM, d#SWR 


BIT SLKOPT, @ROPT CP ;BRANCH IF NOT AVAIL 


BEQ 

MOV SLKSRV, JSLKVEC 

MOV aPR Ry »giluvecte 

BIS SET IE BIT 


tSIRN ON THE UNIBUS EXERCISER IF PREGENT 
UBESET: a Js0PT.CP i15 Ube QPTION AVAILABLE? 

BI tSU[2,a4SiR j INHIBI: BE? 

Bi st »OUNMRS = 515 MAP ON? 


; IF YES 
ISR PC SHUSEINIT s INITIATE UBE 
MOV #64545, a : 


“ae 


s LELLLALLLLLE LEELA LLLLLALLLLLLLLELRELLELERAELA RELA RAERAELAEE 


THE MASS BUS TESTER IF PRESENT 
juan ¢ BIT SNGTOPT, O80PT. CP i} MBT AVAILABLE? 
IT #SW3, J8SWR > INHIBIT MBT? 
STM ; BRANCH IF 
860, dNSUBPASS FIRST SUB ? 
STMM *BRANCH IF NO 
TSTB FIRST PASS? 
TMM ?BRANCH IF NO 
STB sMMON MEM MGMT ON? 
TMM : IF YES 
lie a tS SEE ECT UNIT? 
CLR renee ‘BFE THE WORD COUNT 
my me eretiaeg veer 
MOVB Cae ar Fart mat 


«HEHEHE HHHIHEHHHHHHHHHHHEHHHH HHH HEHEHE 


aert L _STMM pout NE 
TINE TO SE Up MEMORY MANAGEMENT TO RELOCATE PROGRAM CODE ABOVE 16K 
CHECK IF PROGRAM IS TO BE RELOCATED. 
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Qk OUTINE 


a 
a 
ee 


ae 


nv 


Ht Gas fs fae fae fst fs 
w 


Bos 


—e 
a 
o28 


= 


iiikeeee SHORE BERS 


Bees 


: 


ie Le 2 


Bo999 


eS 
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;SW&=1=NO RELOCATION | 
©  SELKEEELKLARRELELHSARA ARR AA AA AAALALAL AAA LALA S RAAAL ALA AAAARLRAAER 


177570 Stmm: BIT 
BEQ 
INP 


THE PROGRAM IS GOING TO RELOCATE. 

RELOCATION WILL BE PERFORMED IN KERNEL MODE WITH PSW SET AT PRIORITY 
;LEVEL 4 19 PREVENT TTY INTERRUPT-HHICH CHANGES DATA IN PROGRAM) 

THE *T* BIT IS CLEARED (IF SET). AFTER THE DATA HAS BEEN WRITTEN IT IS 


SW6, d#SWR ;RELOCATION DISABLED? 
2e on ;BRANCH IF NO 


ED BEFORE EXECUTION. 
MOV aeP Upon ;SAVE CURRENT PSW 


SW: .WORD 


MOV 
JSR 


MOV 
MOV 


2 
70 


B388S3333 58583335533 RS85323 


8 


~“ 
~ 


0 
#PRY 
per eRtBIe ;CO CLEAR ’T’ BIT IF SET 


; NOW oy oo MANAGEMENT REGISTERS. 


77406, RO ;SET CONSTANT=R/W UP 4K WORDS 
;SET KIPORO,1,2,3,8 7 R/W UP 4K WORDS 


;NOTE: THESE 2 INSTRUCIONS EFFECTIVELY 
;RELOCATE PROGRAM EXECUTION 


;SET UP KIPARS & KIPARY 8 S 


any 
38 
3 


rh 


: 


: 
; 


;AND OF COUSE THE I/0 PAGE 
;SET UP USER MEM MGMT REGS 


an 


3 
3 


a 
a 
Z 


23 


;SET UP SUPERVISOR MEM MGMT REGS 
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DE@KCB 
Re 
78 
a? 
rene 
pene 
ree 
: 
ae 
opie 
rete 
peso 
ress 
. 
7630 
763 
a! 
rem 
7s 
Tete 
ria 
reas 
reg 


wv 
~_ 


= 
£o 


Sees Eee 


uN 


Ss: 


sanaaaraanrees 
Bee 


BEEERR 
Besse 
8 
: 


ee 


SS 


S599 
ss a 


Y aK PAR? , 24S 1PAR? 
#1, a8 


Roy aucea' 1 EIRALE nM Han 
P .DSMHON :SET MEM MGMT ON IND = ON 
RETRY: CLR se RVEC+2 


MOV #ENOMEM, JSERRVEC;SET TIME OUT TRAP VECTOR 
MOV #60000, Re : SETUP GENERAL REGISTERS 

DATA WILL BE REL ATED FROM 

ADDRESS IN RO TO ADDRESS IN R2 
MOV #137776,R3 ‘GET 18K iNebe TO RELOCATE 
MOV RO, (R3) TRAP TO ENOMEM IF INSUFFICIENT MEMORY 
MOV SERPRT QERRVEC RESTORE ERROR TRAP VECTOR 


» : Susunedooungussceuneceonsonsnasuonousneussecqqnseesesqnansesss 
'SBTTL RELOCATION ROUTINE 
P THIS ROUTINE IS USED TO RELOCATE THE 9 SUBTESTS UP TO 28K. 


+ IF RELOCATION BY AN 1/0 DEVICE IS SELECTED, CONTROL IS PASSED 
iH TO THE 170 MONITOR. 
= ENTER WITH: 
is ERSTAD=PHYSICAL ADDRESS OF FIRST CODE 
1% Re : = ee PHYSICAL RODRE oye BP FHS SECTION 
# EXIT TO 1/70 MONITOR WITH: r 
* =tIRsr PHYSICAL ADDRESS TO BE RELOCATED 
2 ne =FIRST PHYSICAL ADDRESS TO RELOCATE TO 
* IOWC | =TWO’S COMPLIMENT WORD COUNT 
oe KELSLELRKEEAAA KE LEEFERRE LE RRE REX LE LK RASA E EL ES KPL KEKE KEL AER ELAS 
RELOC: BIT 8SWb, JSSWR 31S RELOCATION DISABLED? 
EXI : H IF YES 
TSTB  d8MMON 21S MEMORY MGMT ON? 
BNE EXITRE *BRANCH IF YES 
HOV os RS AD, RO GET FIRST ADDRESS TO BE RELOCATED 
sLAST ADDRESS IS IN Re 
; MOV RE. Ra ;SAVE LAST ADRESS 
CUB Ra’ Be R4Y NOW HAS COUNT 
MOV RY, GESEACTOR >SAVE BYTE CBUNT 
TST dar ACTOR FIRST RELOC Is TO ENDTAG+2 
BNE 1$ BRANCH NOT EXECUTING BASE CODE 
HOV A aa seve Fan T aR a MB RELOCATE TO 
1S: ADD Ro Ra : *R4 NOW FRORE Cast HEA BoD ss 
CMP RY; JULSTMEM : MORY? 
BHI : H IF NO 
R2 ?R4 NOW HAS BYTE COUNT 
cLR JSF ACTOR 
BIT #SW8, J¥SWR sINHIBIT RELOC BY 1/0 DEVICE? 
ae RELI EOE TART a 
§ s 
NOV spect OVE NEW BASE. ADDRESS 
CLR JeNWBASH : 
ASR RY "MAKE IT A WORD COUNT 
NEG RY GET THWO’S COMPLIMENT 
MOV RY, JNIOWC WORDCOUNT 


sanve R4Y AS 
360 TO 170 MONITOR 


=) 
3 
m 
z 
me 
om 





ure 
























"be ie - =i) os i i e = 4 Un bal, ¥ rt U: 4 bed | «| = 
DEQKCB.P11 RELOCATION ROUTINE 
7650 “RELOCATE BY CPU-MEMORY MANAGEMENT OFF 
7651 034372 012022 RELNIO: Hoy (R0)+, (Re)+ RELOCATE, CODE 
epee Bau3%6 1378 BNE RELNIO ‘BRUNCH IF NO 
oS pao 737 051744 JSR PC SECHKDAT :GO CHECK DATA 
102010 BVC EXITRE 
7655 10037 001276 ». MOV RO, 28S TMPO ;SAVE RO FOR TYPEOUT 
7657 l 10237 601474 MOV R2, J#VADR SAVE Re 
7658 1 i le42 JSR PC, J#CNVADR :CONVERT R2 TO A PHYSICAL ADR 
7659 034422 b4O06 ERROR 6 
7660 O344e4 p08 NOMEM 
7561 O34426 510207 EXITRE: HOV R2, PC ;60 EXECUTE RELOCATED CODE 
pees Bauase Badona Ree (PC) ,PC $0 TO NENT SECTION 
RETPC: MOORD 0 “CONTAINS PC OF NEXT SECTION 

ToS4 ; al Fiat op hehehehehe 
7665 STIL 0 RELOCA ION T 
7666 2% Tas ROU IS USED TO SCHEDULE 1/0 DEVICES FOR SUBTEST 
7667 i Bcatton PROGRAM RELOCATION. THE 170 DEVICE UNIT 
7668 +% RUTGER S DETERMINED, THE BUS ADDRESS CALCULATED the WORD 
7669 +# COUNT CALCULATED AND’PASSED TO THE DEVICE HANDLER. 
7670 ceuneaneancaetaieaieaseaneueeanfenet042 00004 00010 uHEREREEOOES 
771 034434 012737 2 oo1zi2 tdnon: BSLPERR § ;SETUP ERROR LOOP 
7672 O34442 005037 001540 18: CLR ot 137 DBASE 
7873 O34446 013705 172346 MOV SIKIPARS, »RS ;SETUP_R2 AND R3 
7674 O344S2 O0S004 CLR >TO FORM 22 BIT ADDRESS 
7675 O34454 073427 ASHC  86,R4 *FORM 22 BIT ADDRESS 
2676 010537 1542 MOV RS, JENWBASL *SAVE LOWER 16 BITS 
76 4 Ol 44 MOV RY’ JENWBASH :SAVE UPPER 6 BITS 
7678 034470 177570 BIT #SWB, a#SWR RELOCATE VIA 170? 
7679 0344 1402 BEQ 2s *BRANCH IF YES 
7680 Paaco8 167 001436 IMP RELOCP GO RELOCATE VIA CP 
7681 034504 012737 174000 O01S46 2S: MOV #174000, d¥IOWC ;SET WORD COUNT TO 2k 
7b8e G35 12 001 ENTER2: CLR aasTMPe 

1 eee i 001556 MOV #-2, J#RNTBINX SETUP RUN TABLE INDEX 
7684 034524 005037 001276 CLR aaStMPo 
7685 03450 gos00e CLR R2 ;CLEAR LEGAL DEV FLAG 
7686 Q00040 177570 41S: BIT #SWS, J8SWR s INHIBI ROUND ROBIN? 
pees Gsveve Doe73? 001276 et TMPO tac ser? 
7689 034546 O01 BNE 435 *BRANCH IF YES 
7690 034550 113732 1 001552 MOVB  @aSWR,ae°SVINDX GET DEVICE FROM SWITCHES 
7691 034556 i 001552 BIC #1 QSDEVINDX * MASK LOWER 3 BITS 
76 0015 ASL SHDEVINOX “ADJUST FOR WORD INDEX 
76 0012 INC a8STMPO *SET 
7594 14 43§ sCONT INUE 
Pee? GSHEDS OE7a? BOODLE OOISS2 SHS: CHP Fin’ SBDEVINDX TOEVick YET? 
teas faueis poT009 Nm OMBS iter o 1 Ro 
7698 O346l2 O1 7777 O01SS2 48$: MOV #-2 OxDEVINOX : INIT PS INDEX 
7698 O34be0 001552 Hes: ADD #2, SH0E VINDX i INCRE 

1 1S 43$: MOV JaDEVINDX *GET 

7701 Ose32 ot Oi 001300 MOV #401 geSTAP! sINTT Mit MASK 
7708 910 MOV #10 -SET SOB’ 

44 | 1 001606 44S: BITB Sastre, SYSSIZE(R3) ist NNIS UNIT EXISTENT? 
7704 034652 001408 EQ : NO 
7705 034654 o0S2 *SET LEGAL DEVICE FLAG 






| 
! 
} 
{ 
! 
' 





moti Y POP 11/70 CPU EXERCISOR 


170 RELOCATION MONITOR | 
Be Asics 001301 001607 
001300 
001276 


0000 
053610 900010 
017767 000004 d00002 


tun Ge 


RRAA RAAT 
HeSSORONE TOSS 


3 


Ses: 


MACY11 27(732) 


QUSTHP+1, SYSSIZE+1(R3) 
gasp 

sid THPo 

Re uns 

R2 

46S 

#10,R4 
#SYSSIZE+1,R1 
(R1)+ 

Ri 

RY, 475 

ui 

Re 

49S 
SYSSIZE+1(R3) 
435 


R3, 608 
#MSGINX, 60S 
a60$, 60% 


65S 

4§ 
i ae entree 
ENTER2 


6 
?NO 1/0 DEVICES? <ERLF> 


O#RELOCP 

oe SUSTAINS) 
aeSTMPO 

11 


41 
RPSHSTAT(R3) 
6e$ 


3; TYPE ASCIZ STRI 
‘GET OVER THE ASCIZ 


14-OCT-76 10:46 PAGE 157 


;HAS IT BEEN USED? 

;BRANCH IF 

sable T NEXT UNIT 

; INHIBIT ROUND ROBIN? 
F YES 


; BRANCH 
:CONT 
: ANY DEVICES AT ALL? 
;BRANCH IF NO 
;SET SOB COUNT 
;GET SIZE TABLE cat 
‘CLEAR ALL USED BITS ae 
;IN A VICE 7a ik 
;CONT of Bane 
;WAS IT A LEGAL DEVICE? 
: BRAN NCH 


CLEAR ALL-USED BITS THIS DEV 


GEN MESSAGE ADR 


NG 


;ACT11? 
;BRANCH IF YES 


+3 TYPE ASCIZ STRING 
;GET OVER THE ASCIZ 


;RES Re 
;GET REL Gn TON FACTOR 
;FORM L LAST ADDRESS 

UP RS 
:60 tae WITH CP 
iSET Fees GISTERS 


;AND T iia ee 
0 10 VIA CP 
HANDLER BUSY? 


: BRANCH 


;DID HANDLER FAIL? 
;BRANCH IF NO 








pap, C-11-DEQKC-8 FOP bean hontoeee 


-Pil 1/0 REL 


143522 








OR 


001718 10S: 


138: 


315: 


14S: 


MACYLL 27(732) 
TsT aesTMPO 
REQ 625 
MP gulss 
ISB  a8STMP14+1,SYSSIZE+1(R3) 
CLR Re 
ROR aaSTMP] 
INC Re 
Bcc 30$ 
DEC Ge 
MOV Re, J8UNITNO 
MOV JelOWC, RPSHWC(R3) 
MOV R3,R4 
ASH 83, R4 
BIS SaUNITNO,R4 
ab 82, DBRNTBINX 
MOV SerNTE NX, R2 
MOVB $1(R2) 
ROY aatin ! UNIT(RS) 
HOV Re RS oan sy . SeRESVEC 
MOV RP30LD(R3) 
MOV Fer Se Serra Sy 
MOV JSNWEASH, RPSNWH (RS) 
CLR RP30LD+2(R3) 
ee 18 NOON 
BEQ 13$ 
ch #12, DeRNTBINX 
#10000, 380. DBASE 
abe Loree 
IMP ae41s 
MOVB SL TICKS+1,R5 
ADD 82,R5 
SUB . RS 
Bob s(a60., RS 
MOV #10,R0 
CLR pe 
CLR R3 
CLR RY 
ADD RPSHSTAT(R2) ,R3 
ADC RY 
800 #2,R2 
S RO, 14S 
me 
R4 
CMP #4000, R3 
free dae 
DeLTICKS+1,RS 
BNE 31§ 
ERROR 15 
IMP JSLPERR 


14-0CT-76 10:46 PAGE 156 


sROUND ROBIN 
sBRANCH IF YES 


;SET UNIT USED BIT 


;ENCODE THE BIT POSITION 
;INTO & UNIT NUMBER 


‘give WORD COUNT TO HANDLER 


ENCODE DEVICE FOR RUNTABLE 
EK ODE UNIT NUMBER 


Give (aetay OD se ores 
;NEW BASE ADDRESS 
;ENSURE OLD BASE HIGH IS CLR 


sGET SECOND C 
ENSURE RESULT IS S9 OR LESS 


:COUNT WAS LESS THAN S8-RESTORE 
‘SET SOB COUNT 


D YET? 


Bao 
Be 
g 

3 
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ce 


=— OOO 
Penis 


2a 
— 
oO 


SISSgRCRERROR ARUN DOR Ase aa Azan eowUMNS oR RUM NEN ENS 





a ee See ee Oe ne Re EO Ew 


[ 
| 
| 


CPL _EXERCISOR 
OCATION MONITOR 


32S: 


82$: 


ess: 


815: 


19S: 


036046 OO0lel2 18S: 
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age 
aaee 


3 
< 


eess ge 8e 


4 
S 


eesaeyRn gaa 


~~ 
oe 
o 


rep ae aged It 
Re RB 
Sx 


wo 
o 
oO 


azo 
sw eS 
Fx 
— = 


See ineees 


x 
wi 
~ 





i 


= 


SB Qe tr 
i 
&, 3} 
a” BR 


Bo, 
8 
"2 


gon 

a 
ag 
A 


2B 


vs 
a: 


2RRB 
3 


wh ene 

ie? 8 3 

3 5" Fx 
2 


2 


a3: 





3 
S 


2 


REE 
<9 
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sANY DEVICE ERRORS? 
spree IF NO 
sERROR 

3MEM MGMT ON? 
sBRANCH IF YES 
;SETUP RS FOR DATA “HECK 


DATA 
aoe ADR_OF DATA TO BE CHECKED 
ag 2100 LOCATIONS 


LOOP ON ERROR? 
BRANCH IF NO 
;G0 DO FUNCTION AGAIN 


Sees Se ee ee Stee ee ee ee ee eewe wee 
; Sah 
~ 
oo’ 
nn 


eee 
Be 
gens 
oi 
: 


Ra 
3 
R 
z 
z 
8 


;AND DEVICE INDEX IN RY & R3 


;ENCODE 3 BIT UNIT NO INTO 
ONE Ort EN Te LOW BYTE OF STMP1 


|. HSELECT NEXT UNIT 


; YES 
sDATR CHECK ERROR 








gs; 
a 5 
a : 
a : : ; 
= a” & 4 Z w 
: a $5 : : ah a. Jee ye 8s 
2 wee “p Be BY g a3 oy eo & ot 
ae rs +. 2 pees, 6 be 
Pig Se Hs Sek od Ee ak 
S « 7 5 
2 2 Be g Gi Se 
ae : a7 BS as 1a i. + ff 
_ - os * Bs k& 8 5 =f we So wogz 
Fe = =m = @ rf 1 t4 b3 = + (ar-carea pane 
e § bal Sake a : ig. Seostante, seotgpatteaas Bocas 
= nd [es] 2 
¢ Eanelsealateathecedmipetotetseiets cara ussas 
Sag 5 BN Tet boy g 
{LULL Hii UL Lele 


—n 


lv Of REL 
HE 
ae 
is 
000721 
2 
005764 
Ie On 
a: 
: 









@ 

[S| 

& ippepres - FRAN S wr ARAN ee 
<; HUUMUAS AASIAIRAMAAMRMNMAANAES Maal MAMnAaas 

qe 


MAT 
DEK 





| 
RRS Bgsee apppeeERStPaSPraRROOT | 


en ee en ae + 


rom 
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036234 013737 172382 172344 MOV GeKIPARS , d#KIPARG 
:susnsnasunennnenuensuenbeesscenseneecnvenseessengeeseesseesuenyetsstessest 
oe eT ING IN KERNEL MODE RELOCATED TO ADDRESS AS 
HTELED. IN eyPeeo ns a EX. IF KIPARO=1600 THEN PROGRAM EXECUTING AT 


036242 013700 172340 MOV 4 ,RO :GET 
Whee rong aS -7,RO GET ct Bits 4 cide 7>_IN LOW BYTE 
1 1 MOVB RO, as$TSTNM+1 Y REG HIGH BYTE 
1 1200 MOV #KERSTK, SP CET KERNEL eran 
177776 CLR aePSid 
16746 175356 MOV OLDPSW,-(SP)  ;RESTORE OLD PSW 
12746 005406 MOV SLOOP, -(SP) 
105737 001502 TSTB = @BNEXE! sBRANCH IF TEST CODE TO 
TSE 033630 coy bee, (SP) a 
1S: RTI sRESTART PROGRAM AT LOOP 
-WHEN RELOCATION ABOVE 28K IS COMPLETE PROGRAM TRAPS TO ENDMEM. 
022626 ENDMEM: CMP (SP)+, (SP)+ sPOP STACK TWICE 
005037 177572 ENDM: CLR asSRO :DI MEM MGMT 
042737 000020 172516 BIC #B1T4,aeMMR3  § ;CLEAR o2 BIT MODE 


JHB HEE er a +t sy 1 * eee eee: 
iat ar Tals ie A’ TED. 
EXECUT Ng it “ib ere RO AT PC AS SHOWN (NO RELOCATION) 
VALUE FOR PAR REGISTERS 


moe Ee 


PLAC URE RERPRREE MA Sia aaaua acs uniunanes ere Le cept iaiss 


012737 O00600 001520 
BOIS con ot ae 
i 901600 o01S20 MOV ite JSNEXPAR 
105037 001503 2s: CLRB  a@sMMON -SET MEM MGMT ON IND = OFF 
; jiasetessateusasaseteeeensenene LPEEPETEETETESTT ET ET ESET ESTE TTT TT 
+ he ROUTINE SETSUP THE PSW AND MAINTENANCE REGISTERS 
2 .1T TARTS THE PRINTER 
2 (IF NOT ON ACT11) FOR TYPING THE END OF SUB 
ae ea 
ee 000004 i: MOV SERPRT, JSERRVEC 
fe tee Kos ae se ane 
Obs? 1 001200 MOV SKERSTK, SP *SET KERNEL STACK P 
100 142640 BIT #100, astPs i CHECK IF OUTPUT DEVICE IS BUSY 
026404 D 1374 mm vs BNE 8 1S AVAILABLE 
ee si te5708 nove a Re a 
000006 CMP sR TES 
aes 9 000060 001532 a es. JSSUBPASS —— HF Rot al 610 COUNT TO ASCII 0 
477750 CLR aaMAINT AR MAINTENANCE REG 
1604 cL SESHAINT CLEAR SOFTWARE VALUE 
036450 01 036556 HOV 8SEOP, -(SP) 
12737 001472 oO00014 MOV #SRTRN, A#TBITVEC SET 'T’ TRAP VECTOR 





2 











DEGKCS.P1l 


fae? Osera 





EB ereua 


SOW RRS RESUS WON R Nets c one bae RAS oR Cae R RAT oRaeS 








036510. 


bane 


001531 001270 
142544 


OS3SS0 001604 
177750 


1 
000200 


OS4600 
142470 


MAINDEC-11-DEQKC-B POP 11/70 CPU EXERCISOR 
. END OF SUB-PASS ROUTINE 


142504 
001270 


142374 
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MUV SSUBPASS-1 , d#SREGS 
aSTPs 


MOV PSWTAB(2).-(SP) ; s PUSH NEXT PASS PSH ON. ON STACK 
MOV sLOOP, -(SP) SART PROGRAM A 

MOV mmgTad Ra), gusraint 

NOV GRE TRO(RE) ,SarHIN 
TSiB. oa 


38: PASS? 
RTI1 eae 
200, 387PS INTER READY” 
BNE 3$ ; BRANCH 
MOV #MSG20-1, d#SREGS 
ASRS a@STPS ; TYPE END SUBPASS MESSAGE 
RTI1: RTI RESTART PROGRAM. AT LOOP WITH NEW PSW 


;(FROM TABLE BELOW) 
3p HEAR AEE SESE AE EAE SEGRE EEE SEE EE SEER SEE EEE EEE EEE EEE EEE EE EE 
-SBTTL END OF PASS ROUTINE 


HETvEE END PASS NUMBER (SPASS) 
is Lae S_ #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY” 
IMAL NUMBERS 


XXXXX AND 
aie THERES A MONITOR GO 


TO IT 
IF THERE ISN’T JUMP TO LOOP 
SEOP: 
ISR PC, O8TYPTIME 
CLR STSTNM 3;ZERO THE TEST NUMBER 
CLR STIMES ZERO THE NUMBER OF ITERATIONS 
I SPASS INCREMENT THE PASS 
BIC #100000,SPASS ;:DON’T ALLOW A NEG. NUMBER 
DEC (PC)+ ;;LOOP? 
SEOPCT: .WORD 1 
BGT SDOAGN + YES 
MOV (PC)+,a(PC)+ 33RESTORE COUNTER 
SENOCT: _HORD 1 
pagss: -ASCIZ ee nasi $5 


MOV SPASS,-(SP) ;;SAVE SPASS FOR TYPEOUT 
PASS NUMBER 


TYPOS oe, ASCII WITH SIGN 


TYPE 675 
BR 5 °GET OVER THE aSclzZ 
-67§: .ASCIZ 7 TOTAL ERRORS SINCE LAST REPORT 7 


bés: 
MOV SERTTL, -(SP) FOR TYPEOUT 
tifor A SETeER OF ERRORS 
ve ie etal 
CLR aSeitt $1 LYDR Cee ERROR TOTAL 
SGET42: MOV as842, RO ;}GET MONITOR ADDRESS 
BEQ SDOAGN *BRANCH IF NO MONITOR 
RESET i 5CLERR THE WORLD 














SSUES CRE MST ERO 





goue 036750 004710 SENDAD: 
a Gere Gites 
B04 036760 cenit aes SDOAGN: 
Beg BST Eee eS noo SENULL: 
8049 036770 
8050 ; 
8051 = OTT 
8052 
Bhed 036770 104412 ycees 
Spee SSETTE Ase7a? BOUNDS ODIE7E 
Brad 037004 Bai4a3 
BS BR MY poe 
cei fas hare thie THEE 
8062 001 
Ses fete DoD 
8068 hr Oo aes 1S: 
8068 fea eA See 
a7 yom MS 
8071 : 
Girt Sarten Seeras 
a fart, Ory 
aire Garis Glew flee 
au. 
Scr Bus aes Sie 

1 12? 1 
1) oe 

1 11400 : 
cos fin Geert 
Bes ec 

0371 177760 2S: 

oe att ae 000011 

1 000011 
Ae A 
Bee 1 Gibbs 001642 : 
Boge 010 att: 
80% 037206 11 177775 002072 
8097 037214 032737 O00040 172516 
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JSR PC, (RO) 
NOP 
NOP 
NOP 
IMP M#LOOP 
BYTE =1,-1,0 
“EVEN 





10:46 PAGE 163 
3;G0 TO MONITOR 
;;SAVE ROOM 


; RETURN 
;;NULL CHARACTER STRING 


jsteeenhaeeeussuneeeesueseneeeneeeeneneneennneeenssnsenessensens 


ER 
TION FOR FUNCTIONAL DESCRIPTION OF HANDLER 


Q#RP3HSTA 
BIT #8178, J#RPSHSTA 
BEQ 8$ 
RESREG ‘ 
MOV JSRNTBINX, IURPSL1 
BIT , aeslih 
BEQ 15 
CLR AD 
ae 
FR, PC, a#SRAND 
MOV : NUM, RO 
MOV # RI 
ASHC  &-7,R0 
Be ety 
BPL S$ 
ADD #624, RO 
BR 4§ 
MOV J#RP311,R2 
MOV RUNTBL (R2) ,R3 
BIC #777. R3 
aby R3, RO TBL (R2) 
ASH Roa ET 
MOV R1.R3 
BIC #160377,R1 
CMP #11400,A1 
Bo T1400,RI 
BR : : 
BIC #177760,R3 
CMP #11,R3 
OO 

#11,R3 
Br S 5 Ri 
ah R1, RUNTRAK (Re) 
MOV RO, J#RP 
MOV Ri’ aeRP 
MOVB #3, JHRPSTRY 
BIT #B1TS, JeMNRS 


;EeaAeaEAeaAaanuneananeuetsnGheiAEsHOoEEAESEEOEEAESESOEOAE EOE 


;CLEAR DONE FLAG 
REPEAT FLAG SET? 
sBRANCH Ir NO 


5 Cone iNe TRK-SECT 
;PUT IN TABLE 

VE DESIRED CYL 
; DSK ADR 
sINIT TRY COUNT 
;MAP ON? 











MAINDEC-11-DEQK 
DEQKCB.P1l 


+ 
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= 


em 


Bult 


ge 
Ss 


BON SSSI ES SSBVRR ON Bee RR ORS Seon sc on-OSS VOR LOO oe 


= b-* b= bs Ba bs Fe 8 Fh 2 Be bt Bs 0 0 4 6 0 2 > be 0 2 he po Bs + 8 Be He he Bp ee 
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001564 


142562 
142562 


142532 
142530 
4 


142524 
142510 
142504 


001700 


001572 
177570 


POP 11/70 CPU EXERCISOR 
11/RPO3 HANDLER 


LDRP3: 


5 ; RERAHRELLLALELELELALELAAAESLLELLLLLLELELELLLLLELLLLLE ELLER ELLE 
-SBTTL RK11/RKOS 


jj LRHHNESSOESEEEREREREOSOSHERSROEEOSEEEHODOEESERERESEEERINEONEE 


6S: 


4§: 
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ee 7$ : BRANCH IF NO 
MOY DRRPROLD. -(5P) PUT DDR OE BS aOR ON STK 
JSR Be iat CET MAP OF ofeten 
MOV #103, J8RP310 GET FUNCTION 
MOV J#RPSOLD+2, RO *GET BAE BITS 
ASH #4, RO ‘SHIFT TO BITS 48 5 
BIS RO, J#RPS10 *COMBINE WITH FUNCTION 
MOV RO’ d#RPSOLD+2 
MOV J#RPSUNIT, RO 
ASH #10,RO ;SHIFT UNIT NO TO RIGHT BITS 
BIS RO, a#RP310 :COMBINE WITH FUNC & BAE 
MOV RO, J#RPSUNIT 
RESREG 
30S s1S DRIVE READY? 
SWTRY *BRANCH IF NO 

BIS DSRPSUNIT. IRP3CS *SET UNIT BITS 
JSR PC, J8LDRP3 sLOAD RP3 REGISTERS 
Mov #RP3SRV, IRPSVEC :SET VECTOR 
CLR UN ;SET FUNCTION TO WRITE 
MOV J#RP310, IRPSCS *LOAD FUNCT AND GO 
RTI > RETURN 
MOV DRPSHOA, IRPSDA LOAD DSK ADR 

JSRPSHDC, IRPSDC *LOAD CYL ADR 
MOV DERPSHWC, IRPSWC LOAD WORD COUNT 
MOV JBRPSOLD, IRP3BA *LOAD BUS ADR 
RTS PC ;RETURN 


HANDLER 
SEE DOCUMENTATION FOR FUNCTIONAL DESCRIPTION OF 





SAVRE 
JSRKHSTAT sCLEAR IN HANDLER STAT 
Gre Sate aERKHSTAT EE EP AT eLaG GET? 
BEQ 5$ >BRANCH IF NO 
RESREG 
IMP DURKRPT 
MOV #RNTBINX, J#RK11 SAVE RUN TABLE INDEX 
Be eS ESUR OM Cpee ADDRESS? eee 
Bt es o BRANCH OP Ee 
cLR R 3CLEAR REGISTERS 
fe FOR ADDRESS CHECKING 
Ranta i tne 
ASH #-3,RO ° eB just AO EORR 
*CYLINDER ADDRESS 
MOV RO,R1 : SAVE IN Ri 
BIC #160037,R1 GET RID OF SURF-SECT BITS 
CMP #14300,R1 IS ITA LE CYLINDER? 
BPL “BRANCH IF YE 
#14340,R1 "ADD MAXIMUM CYLINDER 
BR rT TRY AGAIN 









NAINDEC-11-DEQKC-B 
Pll 
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bo bo b= B29 h + G2 P+ P+ Pm Pea B= Pw pe 


—BIdIetadZan-sSeUERFoR-SSBIeH 


ae hs bb ps en ht fh he ho ho = Bt ps fone Pt he fe Fe Pee Be PR pee 


BSGFR LEGALS BBIRR LGV 


8 
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cis 


Bospue 


© 
Fe e 


RK11 


-_ 
co ms fro 


= 
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= 


g 
é 


55 


288 
Seo 


a 

rm 

~ 
-_ 
Oo 


POP 11/ 7 SFY EXERCISOR 
3$: 


Dow zw 
“UO 
~ 


Pace a 
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Dzow zz 
RSAnSoe 


Steteteto) 
$525 
Oxo 


Orie 
<WNOND 


RiT 


s ADJUST CYLINDER ADDRESS 
eit R2 
RUNTBL URE) ,R3 

#777,Ra DAN D UNET NO. 
te CHLTIER OR IN. — 
*GET RID OF EXTRA BITS 


Seay T RID OF SURFACE BIT 
31S SECTOR ADDRESS LEGAL? 
; BRANCH He Meg 


sce 
— A 


:GET BET RID OF CR OF CARRY FROM ADD 
;GET SURFACE ADDRESS 

:GENER COMP ig tng 8 ADDRESS 
SAVE _IN RUN TRAK TABLE 
ADJUST CYLINDER ADDRESS 

i CONCATINATE TRK & SECT ADDR 
GET UNIT NUMBER 


;CONCATINATE UNIT, TRK, SURF, SECT 


REgARSBE Ee 
BS? 28 7 
8 


Bz 


ae gat 
BG 


ON STACK 


=o 
Se 
5 2 


$e 
Bi 


: ae 


: 


cee 


;LOAD INTERRUPT VECTOR 


;SET FUNCTION TO WRITE 
;LOAD a AND GO 
;RETURN 


HMMM HH MBHHHHEEBEEHEBEHEHEHEEHEEEHHEHEHHEEHEE HEHEHE 


-SBTTL 


TATION FOR FUNCTIONAL DESCRIPTION OF 


HANDLER 
» PUREE EHH EHH HBSS aa 


Foes SAVRE 


a TA ; CLEAR Dore PLES 
#BIT8, d#RPYHST REPEAT FLAG SET? 
6$ ;BRANCH IF NO 


O#RPYRPT 
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1556 001574 6§: 
17 


own 


wo 
ease 


Heateanes 28 


2 


gazagome 
<u S00 


— 


Baws Ss Se 


SUE OU Es Sear oae SUR ROOROD IE NMOENM Nee seers 
osugees 


Gecheees GUOniisveessecsccecssasuns sci enenieas 


or 
afte 


RepRoe 












DeRNTBINX, DBRPYL1 ;SAVE RUN TABLE INDEX 
J#RPYHSTA ‘CLEAR DONE FLAG 
8SW4, J¥SWR "RANDOM DSK ADDRESS? 
1$ “BRANCH IF YES 
RO 
Ri 
PC, J8SRAND :GET 
JeSHINUM, RO GET HI R 
ONUM, RI :GET LO R 
#-7,R0 "ADJUST TO FORM CYL. ADR 
#177000, RO GET RID OF BIT 
#631, LEGAL CYLI a 
S$ *BRANCH IF YES 
#621,RO0 : IT 
4§ - 
D#RPY11 Re GET RUN TABLE INDEX 
RUNTBL (Re) ,R3 GET DEVICE ID - 
8777 SAVE ID ONLY 
RO,R3 *COMBINE WITH CYL ADR 
R3; RUNTBL (R2) *PUT IN RUN TABLE 
#-3, Ri *GEN -SECT 
#160340, RL GET RID OF UNUSED BITS 
a *GET RID OF SECT BITS 
#11000, Ri sLEGAL TRAK? : 
#11000,R1 RAKE LE 
#81T13.R1 , GET RID OF ADD CARRY 
wea easton 
: 9 
3$ BRANCH F YES 
#25,R3 > MAKE iT LEGAL 
#81 TS,R3 GET RID OF ADD 
R3,R1 *COMBINE TRAK-SECTOR 
R1, RUNTRAK (Re) > PUT “SECT IN TABLE 
RO, a#RPYHDC i SAVE YLINDER ADR 
R1, a8RPYHDA : =SECTOR ADR 
$-3, JURPYTRY SET TRY COUNT 
PC, LDRP4 -LOAD RPY REGISTERS 
#RPUSRV, ORPYVEC ;LOAD INTERRUPT VECTOR 
3 
SOREN *SET FUNCTION TO WRITE 
#161, ORPYCS1 LOAD FUNCTION AND GO 
;RETURN 
D#RPYUNIT, ARPYCS2 sLOAD UNIT R 
#BIT1 TTP aGE eet FORMAT TO 16 BIT 
a i "LOAD CYLINDER ADR 
F} ‘ HDR sLORD TREK-SECTOR 
raat JRPYBAE He BO TENDED ADR BITS 
SERPHOLD, GRPHBA iL ORD 8 BUS ADR 
§ 













C-11-DEQKC-B POP 11/70 CPU EXERCISOR 
70/RPO4 ER 
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SALINE 
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oi LORS: MOV SERSHOA aRcDR it Oe SP 
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md Fae Ut 
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5 ; RHRERAARERSEELRLAALLERELALAL LAL S LALA ERERELEE LLLLLLAL ELLA EEAELES 
*S8TTL RH70/RSO4 HANDLER 

3 SEE DOCUMENTATION FOR FUNCTIONAL DESCRIPTION OF HANDLER 
a GT one oon ns 





SHSTA sCLEAR DONE FLAG 
T A578, aaRSHSTAT *REPEAT FLAG SET? 
Q ‘BRANCH IF NO 
RESREG 
IMP DeRSRPT 
3S: MOV J#RNTBINX, JHRS11 SAVE RUN TABLE INDEX 
BIT #SW4, J8SWR *RANDOM DSK ADR? 
BEQ 1$ “BRANCH IF YES 
CLR RO 
CLR Ri 
BR 4§ 
1S: JSR PC. a#SRAND ;GET RANDOM NUMBER 
MOV OsSHINUM, RO , 
nov Ro ALT S NUMBER 
4g: BIC RB oGa77 RO >GET K 
CMP #7600, RO 1S IT LEGAL? 
Bob CREO TEA 
BD ¥ ,RO *MAKE IT LEGAL 
S$: MOV J#RS11,R2 GET RUN TABLE INDEX 
ASH #-6, RO : “ADJUST TRACK ADR 
MOVB RO, RUNTBL(Re) >SAVE TRAK ADR IN RUN TBL - 
6$ BIC #177700,Ri1 *GET SECTOR ADR 
CMP #77,Ri 71S IT LEGAL? 
BPt es *BRANCH IF YES 
RD v7 ,Ri *MAKE IT LEGAL 
2s: MOV R1, RUNTRAK (Re) : IN RUN TRAK TABLE 
ASH a6, ; TRACK 
BIS R1,RO i COMBINE SECTOR TRAK 
NOV n= OC TRY °SET TRY 
Resrec ; 
RSWTRY: JSR PC,2 :GO LOAD REGISTERS 
MOV SRSSRV, IRSVEC >SET INTERRUPT VECTOR 
CLR JRSPSW 
LR JeRSFUN ;SET FUNCTION 19 WRITE 
1S: STB aRSDS j1S DRIVE READ 
BEQ rt; iO 
Hove #161, aRSCS1 TOAD FUNCTION AND GO 





MOV 
Rov SuneNSIS'Secane © LORD EVTENSED Boones 


MOV #RSOLD, JRSBA iL 0Ab 8 BUS ADDRESS 
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001555 
100000 


100200 
141052 


100000 


002060 


002070 


001676 


141136 
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'SBTTL RPLI/RPOZ SERVICE ROUTI 
2 SEE DOCUMENTATI 


Witt tt 


RP3SRPT: RESET 
DEC DeRPSFUN RESTORE FUNCTION 
chp i QaRPSFUN WHAT IS IT? 
Q pal ; BRANCH Ma We oe 
1S PSWTRY i BRANCH 0 READ 
1$: IMP RP33 
RP3SRV: INC DeRPSF ; INCRE FUNCTION 
#2, J#RPSFUN tWHAT IS IT? 
BEQ RPSWCK ‘BRANCH TO WRITE CHECK 
orb aaRPSREAD 
;FUNCTION JUST EXECUTED WAS A WRITE 
BIT #8178, J#RPSHSTAT sREPEAT FLAG SET? 
RP3LOOP *BRANCH IF YES 
TS @RPICS ANY ERRORS? 
BPL RP31 “BRANCH IF NO 
TSTB = MSRPSTRY :TRIED 3 TIMES? 
BEQ 3ERR *BRANCH IF YE 
MOVB  #BITO, aRP3CS CLEAR THE DRIVE 
TSTB 3cs >CONTROLLER READY? 
BPL 4 >BRANCH IF NO 
INCB @8RP3TRY INCREMENT TRY COUNT 
MOV aaPSW, -(SP) “MAINTAIN SAME PSW 
HOV #RP3WTRY, -(SP) sSeT ufeirY ADDRESS 
RP3ERR: MOV #100200, 3#RP3HSTA *SET ERROR BIT IN HAND. STA 
MOV RO, -(SP3 >SAVE RO 
MOV J#RP311,RO GET RUNTABLE INDEX 
BIS #BIT15, QUNTRAK(RO) >SET ERROR BIT 
MOV (SP)+, RO RESTORE RO 
RTI + RETURN 
RP3LOOP: MOV #100200, J#RPSHSTAT ;SET DONE AND ERROR 
TST JRP3CS : ? 
BMI 1$ ; IF YES 
. BIC #81715, J#RPSHSTAT: *CLEAR ERROR BIT 
: : 
sWRITE WAS OK- NOW DO A WRITE CHECK 
RP31: MOVB  #%-3, a8RP3TRY s INIT TRY COUNT 
MOV #107, J#RP31O SET FUNCTION 
BIS JHRPSOLD+2, DHRPS10 > SET BIT 
I #RPBUNIT, O#RPS1O SET UNIT BI 
RP32: JSR a *LOAD RP3 REGISTERS 
MOV JRP310, IRPSCS sb TION 
RTI *RET 
“FUNCTION JUST EXECUTED WAS A WRITE CHECK 
RP3WCK: BIT #8178, J#RPSHSTAT *REPEAT FLAG SET? 
BNE RP3LOOP sBRANCH fF YES 
TST ORPSCS ‘ANY ERRORS? 
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TINE 
ON FOR FUNCTIONAL DESCRIPTION OF ROUTINE 
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RENCRERES 
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-DEQKC-B POP 11/70 CPU EXERCISOR 


RP11/RPO3 SERVICE ROUTINE 


Agena i$ 
901566 DeRP311 
001422 4§ 
105737 002072 S$: gure TRY 
4 P3ERR 
: oS 1 140730 oeTTa SRPICS 
t1eg7e ree Hate 
1003 .- 
105237 002072 JaRPST 
01374 177776 JPSW, -(SP) 
01274 041074 32,- 
need 000010 140674 4S: #B1T3, IRP3ER 
001752 55 
WRITE CHECK OK- NOW DO A READ 
112737 177775 oo2072 1S: MOVB —«- #-3, JHRPSTRY 
032737 500040 172516 #B1TS, JUMMRS 
eine tsp) 
004737 052316 PC, JaGIVEMAP 
01274 001762 #RP3NWL (SP) 
004737 oS20Se2 PC, J8GETMAP 
010046 2s: RO; -(SP) 
013700 001764 J#RP3NWH, 
Grebe? 000004 #4, RO 
10037 001764 RO; J#RPSNWH 
012600 (SP)+. RO 
b1e737 000105 001564 #105, J#RP310 
001764 001564 DeRPSNWH, IHRPSIO 
053737 O0e0l2 001564 J#RPSUNIT, J#RPS1O 
013777. 002042 140576 RP33 J#RPSHDA, IRPSDA 
013777 002044 140572 J#RPSHDC, IRPSDC 
013777 001716 140556 J#RPSHWC, IRPSWC 
013777 001762 140552 JERPSNWL. IRP3IBA 
013777 001564 140540 J#RP310, MRPSCS 
oo000e2 
sFUNCTION JUST EXE A READ 
032737 OO0400 001676 AP EE nD RPSHeTaT 
001221 RP3LOOP 
Wane. i0see eo 
105737 002072 JHRPSTRY 
oe a 
002060 O#RPSFUN 
112777 000001 140500 #BIT0, JRPSCS 
105777 140474 3cé 
100375 4 
105237 002072 D#RPSTRY 
Oise 407776 aePSW, -(SP) 
01 1306 #RP33, -(SP) 
nee OO0040 172516 1S: #BITS, JHNMRI 
001404 - & 
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;SRANCH IF NO 
sFIRST 2k? 


'sBRANCH_IF NO 
; INCREMENT TRY COUNT 


;GO_ TRY AGAIN 
;WRITE CHECK ERROR? 
sBRANCH IF NO 


sRESTORE TRY COUNT 
:MAP_ ON? 

:BRANCH IF_NO 

:PUT DEVICE ID ON STACK 
RETURN MAP REGISTER 

:PUT ADR OF BUS ADR ON STK 
:GET MAP REGISTERS 


“REPEAT FLAG SET? 
sBRANCH fF YES 
sANY ERRORS? 


; BRANCH 
;TRIED 3 TIMES? 
: F YES 


; BRANC ; 
; INCREMENT TRY COUNT 


360 TRY AGAIN 
BRANCH IF NO 





ia 


s SeBtseRS 


SRINESEREESS =| Soy 


PEEPELELEEEELELEE PEEPS SESE CE EE 


Ce ee ee ee ee ee ery 


rarer 
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001417 
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oe aaa POP 11/70 CPU _EXERCISOR 
RP11/RPOS SERVICE ROUTINE 
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CLR -(SP) ;PUT DEVICE ID IN STK 
JSR PC, d#GIVEMAP RETURN MA alee 
TST (3 )+ jREST RE 
2s: peye #200, J#RPSHSTA ;SET DONE FL RG 
RTI : RETURN 


H eeuienaladeauaeuaeueemeneusnniaennme aha benmeemennamacnatieds 
“SBTTL RKLI/RKOS,S SERVICE ROUTINE 
CUMENTATION FOR FUNCTIONAL DESCRIPTION OF ROUTINE 
seuguaes abebekbohsonadamabatienioiadanntobksananasaneteansssicien 
RKRPT: RESET 


Q#RKFUN RESTORE FUNCTION 
CMP #1, J#RKFUN ‘WHAT IS IT? 
BEQ RKi *BRANCH IF WC. 
BLT 1$ *BRANCH IF WRITE 
IMP DERKWTRY ‘IT WAS A WRITE 
1$: IMP JeRK3 
RKSRV: ADD #1, J#RKFUN FIND OUT WHAT FUNCTION 
s WAS EXECUTED 
CMP #2, J@RKFUN was IT A WRITE CHECK? 
BEQ RKWRCK ? BRANCH IF 
BPL +6 BRANCH IF I WAS A WRITE 
IMP JeRKREAD 
; FUNCTION Just EXECUTED WAS A WRITE. ANY ERR 
BIT #81T8, JRRKHSTAT sREPEA "eLaG SET? 
RKLOOP “BRANCH IF YES 
TST IRKCS ANY ERRORS? 
BPL RK1 ‘BRANCH IF NO 
TSTB  a¥RKTRY *TRYED 3 TIMES? 
BEQ RKERR ; BRANCH IF YES 
MOV #1, JRKCS ;CLEAR THE ERROR 
JSR PC’ J¥TIMER *WAIT A LITTLE 
STB aRKCS WAIT FOR CONT CLR TO FINISH 
FNC JaRKTRY ; INCREMENT TRY COUNT 
MOV aaPSW, -(SP) 
HOV #RKWTRY, -(SP) = 
RKERR: MOV #100200, J#RKHSTAT ;SET ERROR & DONE FLAG 
MOV RO, -(SP3 ; SAVE RO 
MOV D#RK11,RO _ *GET SAVED RUN TABLE INDEX 
BIS #BIT1S. RUNTRAK(RO) ;SET pBRROR BIT IN RUN TABLE 
MOV (SP)+,R0 RO 
RTI : 
RKLOOP: MOV #100200, J#RKHSTAT ;SET DONE aND ERROR BITS 
TST JRKCS BNY ERRORS? 
BMI 1$ tBR F YES 
BIC #B1T1S, JBRKHSTAT sCLEAR ERROR BIT 
1S: RTI * RETURN 
“WRITE WAS OK, NOW DO A WRITE CHECK 
RK1: MOVB ’ #-3, a8RKTR RESTORE TRY COUNT 
. MOV #50 RKIg *SET FUNCTION TO WRITE 
BIS aeRKOLD+2, RK10 *SET BA EXT BITS 


RK2: MOV SIRKHDA, GRKDA *LOAD DISK ADDRESS 
MOV #RKHWC, IRKWC LOAD WORD COUNT 
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DEQKCS.P1l ICE ROUTINE 
o4 JSR PC, JaTIMER sWAIT A LITTLE 
35cep TSTB arkes ‘WAIT FOR CLR TO FINISH 
992073 INCB = @BRKTRY sINCREMENT TRY COUNT 
i? MOV o4PSH, -(SP) 
ee 2142 HOV #RK3, -(SP) 
OO0040 172516 1S: BI 8817S, JeMMRa ~ MAP ON? 
BEQ *BRANCH IF NO 
909001 MOV 81,-(SP) PUT RK : ON STACK 
16 ISR PC’ d8GIVEMAP *RELINQUISH MAP RE 
TST SP)+ *POP THE STACK 
ICSE 900200 001700 2S: Hove #200, JSRKHSTAT >SET DON E FLAG 
RTI : RETURN 
999019 TINER: CLR 1S 
INCS 61S 





33 + grey aT aera 
;# SEE QOCUMENTATION FOR FUNCTIONAL DESCRIPTION OF ROUTINE 
3 EE 3 ES 


Sere 
Beer 
8567 
Es a pi23% 0000s AbuRET: RESET 
8571 002066 * DEC QBRPYFUN ; RESTORE TION 
Bore Owes Oee737 000001, 002066 CMP $1, 38RPYFUN “WHAT IS IT? 
150 ; eg Rea *BRANCH IF 
8574 BUT RPY *BRANCH IF READ 
8575 0001 guides SeRPuUTRY G0 TO WRITE 
B57 RPYSRV: INC SRP4FUN *FIND OUT WHAT FUNCTION 
000002 o02066 82, J8RPYFUN sWAS JUST EXECUTED 
6578 001504 RPGWCK 
100565 BMI RP4YREAD 
eee sWRITE FUNCTION WAS JUST EXECUTED. 
B82 000400 001706 BIT 8B1TB, JRPYHSTAT sREPEAT FLAG SET 
I RevL OOP sBRANCH IF YES 
E554 Biedl 040000 137542 I 881714, IRPYDS sANY ERRORS 
BSBS 1 I BEQ RPY} ; IF NO 
B58 1 002075 TSTB © MBRPYTRY :TRIED 3 TIMES? 
ot 9 REYERR s BRANCH IF YES 
Boe 137520 5 #8175, aRPYCS2 : ALL 
83 34 004737 TR PCa ;RELORD_ THE tT As 
gear eee MOV ay -(SP) SOP THE STACK TO 
B53 01 MOV BRPYW TRY WRITE AGAIN 
boos ; 001706 git 1T8, JURPYHSTAT jREPEAT FLAG SET? 
8595 1 000007 137450 MOV 87, JRPYCS] >RECALIBRATE 
8595 04 105777 137444 1S: TSTB = BRPYCS1 :DRIVE READY? 
B97 i on BFL 1$ : F NO 
1 100200 001706 RPYERR: MOV #100209 QeRPYHSTA sSET ERROR & DONE BIT 
10 01 MOV -(SP} : RO 
G601 O42S5i2 013700 001574 MOV JsRP411,RO :GET RUN TABLE INDEX 








D14 
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WINDEC-11-DEQKC-8 POP 11/70 ¢ SOR 
DESKCS. Pl RETDORPAY SERV INE ROUTER 
2602 100000 00164 Bis #BIT TRAK (RO) SET ERROR BIT 
ited . cy CSP STAR CRO) SPECT ERE RO” 
8604 oooode RTI * RETURN 
00:70 RPYLOOP: MOV #100200, JsRPYHSTAT sSET DONE AND ERROR BITS 
seas Gae77? AShS0o 137414 BIT #81714, SRPYOS SANY ERRORS? il oe 
Boos Dierae 100000 001706 om He IT15, S#RPYHSTAT i CLEAR | BIT 
BEI “WRITE OK...NOW DO A WRI afHeck. : 
Bele 11273? 1 002075 AP4Y1: MOVB 8-3, JSRPYTRY sINITIALIZE TRY COUNT 
861 1758 RP¥2: STB a@RP4DS 71S DRIVE READY? 
8614 1775 BEQ RP42 ‘BRANCH IF NO 
861 004 040276 JSR PC, JeLDRPY 
gb e777 000151 137336 hove #161, ORPYCS1 ;LOAD FUNCTION AND GO 
8618 
= FUNCTION WAS A WRITE CHECK 
oes 032737 00400 001706 AP4WCK: Nest sats g,gereuSTAT rr vee 
ees 040000 137334 Bt pA NO eens ; 
8623 1421 BEQ 1$ ;BRANCH IF’ NO 
Boos E26 108737 002075 3S: TSTB =: SERPYTRY ;TRIED 3 TIMES? 
Se Does? net BEG SBRKEUN FUNCTION TO WC 
Bese ast pes 334 900040 137306 Fe eT pucse iSET FUNCT 
BB 5 46 ISR PC saCDrp RELOAD TH THE UNIT NO 
265 INCB = @BRPY ; INCREMENT COUNT 
8630 O4e655 O01 1 MOV a8PSW, -(SP) 
be (Ol 042564 MOV sRPY2, -(SP) 
a7: RTL ;TRY_ AGAIN 
040000 137256 1S: BI 8BIT14, ARPYCS2 *WRITE CHECK ERROR? 
Ba 5676 O01404 BEG es : IF NO 
001574 T BRP411 FIRST 2K? 
Bb ) 1401 4 BEQ 2s 
000747 BR 3s 
8640 1 177775 ui se eager TIALIZE TRY COUNT 
BeH 10e777 137236 43: 3 anf 13 Ont ve RERDY” 
Beis fierel Bare ouere fel Be au ary toe Rebs 
OL 137212 ay : , ORPYBRE iL AOR BITS 
a 1 vrata 1605 MOVB ot oRPaes ‘ - : Sap PURCTION AND GO 
ees RTI RETURN 
th | FUNCTION JUST EXE 
BESL 032737 000400 001706 1 , Rite, genPwsTAY sREPEAT FLAG SET? 
8651 OOlebe BNE YES 
bebe 040000 137166 8! 061 14, ees BNY’ ERRORS? 
BESH 105737 002075 an #RPYTRY hae 
8655 01649 Q SPCERR 
8656 002066 DEC @sRP4FUN tCET FUNCTION TO A READ 
8657 052777 OOCO40 137140 BIS #BITS, JRPYCS2 CLEAR ALL ERRORS 








3 





ei 
a. 

2 
Ba 





Shs 
~ 
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Saiki BE 





~ 
f=} 





pesnoonooaonone 


SNSIKRGLEEREBRET 
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oe 
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a SERVICE ROUTINE. 


= 


100200 
001576 


2753 


: 


E14 
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SR PC RE THE UNIT NO 
NC BtAbaTeT ' i TRERERENT TRY COUNT 
MOV JePSU, (SP) 
MOV #RP43, - (SP) 
RTI sTRY AGAIN 
001706 1S: MOVE #200, 8RP4HSTA isEt ore FLAG 
; Flt ios ght ih 1 1 lt ot lla 
i OCCUNENTAT ION FOR FUNCTIONAL DESCRIPTION OF ROUTINE 
-  FFFFFSLERELERSSLELRELARAEERSLELASELASRKES ES ERAA LESSEE LELAALALSSSE 
RSRPT: RESET 
DEC a sRESTORE FUNCTION 
002070 He 81, 90RSFUN * WHAT is ? 
BLT RS43  BRANEH IF WRITE 
MP #RSWTRY 
RSSRV: INC SRSFUN FIND OUT WHAT FUNCTION 
002070 CMP 82) 28RSFUN WAS JUST EXECUTED 
Be RSREAD 
WRITE TION T EXECUTED 
001710 I WaT Th SURES TAT REPEAT FLAG SET? 
BNE RSI OOP sBRANCH IF YES 
137072 I 881714, aRSOS ANY ERRORS? 
feo, «eae POTD 3 TInes? 
ee a te 
mise eye a 
MOV -(SP) : STACK TO 
HOV RSWTRY, -(SP) *TRY THE WRITE AGAIN 
001710 RSERR: MOV #100200, 3sRSHSTAT ;SET ERROR AND DONE BIT 
MOV RO, -(SP3 ;SAVE RO 
MOV J8RS11,RO >GET RUN TBL INDEX 
001642 BIS #B1T15’ RUNTRAK(RO) :SET ERROR BIT 
HOV (SP)+,R0 *RESTORE RO 
1710 RSLOOP: MOV ¥ QERSHSTAT SET AND ERROR BITS 
re ea BIT teiYis,SRS08 > ANY ERRORS 9 
001710 Bre IT1S, J#RSHSTAT i RRENS ERROR BIT 
I ORITE Ok -.NOW DO A WRITE CHECK ba 
002076 RS41: MOvB 8-3 SRaTRY sINIT TRY COUNT 
RS42: STB Spehs *IS DRIVE READY? 
Fee Be +P HS RECT 
SLDRS *LOAD RS REGISTERS 
136716 MOVB #151, aRSCSI LOAD FUNCTION AND GO 
RTI ; RETURN 
-FUNCTION JUST EXECUTED WAS A WRITE CHECK 
001710 RSWCK: BIT #8178, J#RSHSTAT REPEAT FLAG SET? 








pend 


rE 


8 
a 


- 


55 


an & 
pia ida S86 


= 
£ 
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: 


aT | 
4 222 


cule 


136714 


136666 


136642 


136524 


001710 
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C8. RH70/RSO4Y SERVICE ROUTINE 


BNE RSLOOP sBRANCH IF YES 
1 8B1T14, aRSDS ANY ERRORS? 
ff es Te 
3S: 8 SERSTRY :TRI a S? 
C JBRSFUN ere TUNeTION BACK TO WC 
81S #BITS, aRSCS2 “CLEAR THE ERROR 
INCB © JeRST :INCREMENT THE TRY COUNT 
MOV d8PSW, -(SP) 
MOV RSH2, ~(SP) 
RTI sTRY AGAIN 
1S: BIT #B1T14, aRSCS2 sWRITE CHECK ERROR? 
BEQ 2s ; H IF NO 
T deRS11 FIRST 2k? 
BEQ 2s ‘BRANCH IF YES 
BR 3$ 
sWRITE CHECK WAS OK...NOW DO A READ 
2g: MOVB 8-3, JHRSTRY sINIT TRY 
RS43: TSTB aRSOS 31S DRIVE READY? 
BEQ RS43 *BRANCH IF 
ISR PC, J#LDRS ;LOAD RS REGISTERS 
MOV SERSNENH, ORSBAE 
HOV Shae rod BYE OR AND GO 
T ' 
ha at ay “BIT ouGHSTAT sREPEAT FLAG SET? 
L008 aRSDS fy ee 
a agt . : IF NO 
STB JeRSTRY sTRIED 3 TIMES? 
DEC a R mS ;RESTORE FUN TO READ 
> 
Tp, aRse : T 
Aye aepey (SP) = es 
MOV #RS43, -(SP) 
RTI ;TRY AGAIN 
1S: HOVE #200, 3#RSHSTAT ;SET DONE FLAG 


; re JHE HEHEHE HAH HH HOHE 
“SBT UNIBUS EXERCISER SERVICE ROUTINE 
SEE eh df oll con FUNCTIONAL DESCRIPTION OF ROUTINE 


jqgueeaniabenninnantias SELLE SKLALERALAAE AAAS LARARARALAKRLKE 
JSR —s- PC, SLDKT 30 TO LOW CORE 
Pe Ber 
J x Sey TVEMAP ‘AV Ory pyle IN -_ 
aD 4776, QMLIBESAV STNCRENENT UBE BUS ADR 


























3 
| o = F 
3 te. Pe °& S 2 
z se tes & 5 sw 2 
3 aa as = 6 32> 8 
wast y eth gietete® ts +E 
. B88 Se sae : ee ES yeaa 
HE. gE oth OE e 
ot Boas | Bll ve H ofad 
= > Fe 3 Set Be ooe 
a Hone | eve ee ast Se ee 
1 ssanenaner pats pus oa Sr BEBEDWE SEE Me se — 
a ug 
> Lzz # ~ | 
a 2 gobdi § B & 
& sad ee pez toat se 2 if 
= SSS SSS See EAS: comme BERR 
SF, ? _ _ 
EER Pe eeeeeere Eres a BH 
Be ESLER SNCCESRERMCRERR RRR YE RE Salas ata Sis acas cases ivaINS 













g 
g 
* 3 S 
Ps B gk ; 
= BE 2 5 sp o ; 
ge a: Sg eS p= SFE 
es i or 8 3 .u8 : Eo aS Bos is B52 oP oad 
g FSi 2 Bee 85.268 ce wee. 3-2 Seaee 
a oe x oe S 25 Ee Xa OO IH Br 2 Sz> g 
ee 2 Boa 
4 svat 
s ise: — rs 
xi 5 Swi E 2 EE a 
xi, HY dof @ fight eg 
ray x St a] +; D> @ trmow z=> gs bears =P 
a ziget eet Seas 5 f Se ty: sree ue Besse 
s Mee BG) aitiier 2 Sabete idl, Sass i tit 
= g #0Si¢ 
2 SBBBREE Sluis yale ESERRSERREERERCSN. BEEBE DWE RDSEDEEES 
= ie ie Es 
ae ae 60g B i 
Se : Se: : tr nS 
-“ 8ss 338 ={= 


000161 136056 


7 po13g2 OOl2l2 1S: 


hw a Be & 3: st eS 
SS Bas @ ave ia Ee Fe 88 8 : ES Sazes |e 
fen 


pe eS no oS 


S =< — panes 
iad a 


estietsts tt ets 
SURE SRES PEPE ES incrrterhty 















MAT a | Ammar POP 11/70 CPU EXERCISOR 
DEQKCB.P11 MASS TESTER 
Bess Bsr jeteol 
S74 160201 
ae WIE 000047 000010 
1e774 000007 000010 
Bee Genie Suis 
a8 101 
8889 10074 900000 
8890 fae 004737 053214 
8592 pias tier? 000161 135606 
saa mag 
8895 
8898 
ee 
8901 104412 
8902 004737 053126 
8903 105237 001602 
8904 oy44s4Y 1 000074 001602 
8905 001014 
eae 1 001693 
ae 1 001602 001603 
83909 Biisas b57004 
8910 105037 etter 
Bais eels 005237 001600 
891 14 004737 053214 
Bal pause 12737 000100 177546 
Bais Owe90 Qd0de 
8916 
8317 
8918 
8919 
8920 
8921 
8922 
8923 
8924 
8925 
8926 
ese 
8930 
8931 032737 O40000 177570 
8932 001077 
8933 
pA owws42 000416 
8936 O44S44 013746 000004 
8937 O445S0 012737 044570 000004 
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RVICE ROUTINE 


ASL R2 sADJUST WORD COUNT 
Sus Re, Rl “FORM START ADR OF THIS XFER 
BIS #47, d10(R4) sCLEAR THE WORLD 
MOV #7, Ji0(R4) ;SELECT UNIT 7 
ST (R4)4 sAD 7 RY 
R1,a(R4)+ : BUS ADR 
MOV RO, a(R4) 
isk , PC, J#RESKT G0 BACK TO ORIGINAL CORE 
MOVB #161, dMBTTBL sSTART M8T AGAIN 
RTI TURN 
| HHHHHHBEHHHHHHHHHHHBHHHHHHE HH HHHHEHHEE EE 


STIL 
if THES ROUTING EIPGT RE PROGRR, EXEOUTION TO 1 
i, Ke AND MINUTE COUNTS KEPT IN LOCATIONS “LTICKS” 


MTICKS" RESPECTIVELY. 
jj SHHEEESSEEREREEEAOEEEEEESSSEERTORESSUEOEEDEORERRERRRORUEEEOEES 


JSR PC, J#LDKT G0 TO LOW 
INCB = aR TICKS s INCREMENT TICK COUNT 
CMPB =: #60. , ABLTICKS 5 ONE SECOND YET? 

BNE 1$ fie IF NO 

NCB  dSLTICKS+1 NCREMENT SECOND COUNT 
CLRB = @BLTICKS : SECOND COUNT 

CMPB 9s #60. , @BLTICKS+1 : ONE MINUTE YET? 

BNE rt BRANCH IF 

CLRB ae TICKS+1 

INC ; INCREMENT MINUTE COUNT 

1S: ISR ; Pe aRESKT *RESTORE THE KT 
#BIT6, J8LKS READY BIT IN CLOCK 

Ae : SE TURN 


55S AEE SE EE SE EEE SEE ESE EEE EE EEE SEE EEE SEE EEE EERE 
-SBTTL SCOPE HANDLER ROUTINE 
;¥THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 


THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 

t eTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

2#SWI4=1 LOOP ON 

2#5W11=1 INHIBIT ITERATIONS 

is 1 LOOP ON 

: SCOPE ;;SCOPE=IOT 

OPE: 

BIT #SW14, JNSWR LOOP ON PRESENT TEST? 
BNE S IF SWi4=1 

gueeseSTART OF CODE FOR THE XOR tisTeRevess 

$XTSTR: BR 6S s31F RUNNING ON THE “XOR" TESTER CHANGE 

2: TRIS INSTRUCTION TO A “NOP™ (NOP=240) 

MOV ONERRVEC -(SP) 3;SAVE THE CONTENTS OF THE ERROR VECTOR 
MOV »OHERRVEC = 5 SET FOR TIMEOUT 









MAINDEC-11-DEQKC-8 POP 11/70 CPU EXERCISOR 





DEQKCB. Pil SCOPE HANDLER ROUTINE 


Ba Bee Tae Mate 
es pur Saye 
BS BSS sox s2n00 
Be BSR BE mos ar 
8348 14 101015 
8949 944616 032737 001000 177570 
So ee 
8952 000441 
8953 O44636 105067 134342 
Bore O4464e 005067 134450 
pe Gaara? 904000 177570 
8958 105767 134314 
Bo $F ipaiy 
1 7 isan 134306 
En fens ORO Rea 
cas Bele Bit Ges 
BS Re tee be 
8968 732 112767 1 134257 
Basa anlte tb} 7 134240 
Gn Rie Hee Ie 
pe Aree 16716 134222 
fea 044770 000010 
ee 
2 
cs 
cs 
8988 
SS 
8991 
8S92 
6393 


eS SE 
O44772 216737 134206 001203 
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nov a Pate: Orit VECTOR 
$:; #88e¥END OF CODE FOR THE teeta 
83: ai -_ ssHRS ON ERROR OCCURRED? 
cre SERNAX, SERFLG Ha RR FOR THIS TEST OCCURRED? 
BIT #81709, 4SUR 5 SLOOP ON ERROR? 
7S: HOV $i FER, SLPAOR bree, Loop ADDRESS TO LAST SCOPE 
4G: CLRB  SERFLG $sZERO. THE ERROR FLAG 
cLR STIMES LE THE NUMBER OF ITERATIONS TO MAKE 
3S BIT IT11,d4#SWR He fit epee 
eee is ie FIRST inline cm 
tne $tThes, SICNT i INoRE : 
1$: ROY ation Lae ies Heenf ear 
sous: AE re Me Bees IRB ee 
CLR SESCAPE | SVE, ERROR Lp ERROR ADDRESS 
coat Hove 81, SERNAX $rONY ALLOM, ONE(I) ERROR ON NEXT TEST 
BEQ |. Wipe * :BRANCH IF NO 
MOVB SERFLG, a8 eSTSTNM+L 
1S: MOV TSTNN, GADISPLAY 5 ;;DISPLAY TEST NUMBER 
HOV SLPADR, (SP sr EUDGE FUDGE UDGE RETURN ADDRESS 


SMXCNT: 10 ;MAX. NUMBER OF ITERATIONS 

33 MONT: 10, sansnannsunsensnasnald erie tea ceal eee tesnase 
-SBTTL ERROR HANDLER ROUTINE 

;#THIS ROUTINE ult INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 


suseve oot tocecen Typ Be AND THE ADDRESS OF THE ERROR CALL 


jxTHE S SUITCH oPt fons S PROVIDED BY THIS ROUTINE ARE: 
i Hart CAN OCCUR BEFORE AND AFTER THE ERROR TYPEOUT 


te estat 


3 #SWOS=1 
;;ERROR=EMT AND N=ERROR ITEM NUMBER 


RROR: 
MOVB 





SERFLG, J8STSTNM+1 


















DOBRCRERER Ses 


Fandrandndhanandna 


Seana o8! Sou URN TERAa Is OSS So teoicon oad MATER Cae SRA 





MAINDEC-11-DEQKC- 
DEQKCB.P1l 
8994 045000 es 4 
Be ie 
5 
1 1 
Ras bie 
O4SO44 011657 
ee live 
17767 
ee Bae 
O4S074 767 


134200 
134170 
177570 


T3418 


134150 


ty BY PES XERCISOR 


177570 


MACY11 27(732) 14-OCT-76 10:46 PAGE 180 


7S: INCB SERFLG T THE ERRO R FL sl 
MOV STSTNM, aE | : i Oonet err Test oe AND ERROR FLAG 
TST SESH ;$AaLT On 
BPL i BRANCH I 
8$ a IT10, J#SWR Hin HLT 9 
6 et P 
TYPE LRG 
18: INC RTTL * COUNT NUMBER OF ERRORS 
MOV (SP), SERRPC :GET ADDRESS OF ERROR INSTRUCTION 
SUB #2, SERRPC 
MOVB 3s aS SITEMB Tae AND THE ERROR ITEM CODE 
BIT #BIT13,a8SWR  ;;SKIP TYPEOUT IF SET 
BNE 2g ::SKIP TYPEOUTS 
J PC. SERRTYP ?;G0 TO USER ERROR ROUTINE 
TYPE SCRLF 
2S: TST daSwR ;;HALT ON ERROR 
BPL 9$ :SKIP IF CONTINUE 
HALT >:HALT ON ERROR! 
9S: CMP #SENDAD, 42 ACT<11? 
BNE 3$ s BRANCH IF NO 
ane $F EP ON ERROR 
3S: BIT #81709, 3#SUR $340 PON SWITCH SET? 
MOV _ SLPERR, (SP) FUDGE RETURN FOR LOOPING 
4g: T I SESCAPE is CHECK FOR AN ESCAPE ADDRESS 
~ MOV SESCAPE,(SP)  3;FUDGE RETURN ADDRESS FOR ESCAPE 


T TURN 
3 jeeevespeeeeeareennesenzesreealioacenneeneeenneenecenteeaneaans 
*SSTTL ERROR MESSAGE TYPEOUT ROUTINE 
sXTHIS ROUTINE FIRST TYPES A STANDARD MESSAGE CONSISTING OF THE 
VIRTUAL PC, THE PHYSICAL PC ss Piss Cou TIME OF THE ERROR C 
N THE LOW 


HER ree Rca 
ma URE ee 


ele s' 70 BE REPORTED. IT 
iornr rch an PSotE ce yess Om 
ine. DA aa INTER AND DAT wen OBTAINED. 


AINED 
FORMAT 
S OF DATA FORMAT, AS FOLL 


; DATA TABLE WORD IN 
is OF oct TABLE WORD TO 


0 we we we we we we we woes we 
amare. 
£& Ww Ww eK Oo 


POINTED” 10 DATA 


RT boas 
TO FLOATING POINT 





CONSISTS OF THE SUS PASS COUNT IN THE 















MAINDEC-11-DEQKC-B POP 11/70 CPU EXERCISOR 
DEQKCB.P1l ERROR MESSAGE TYPEOUT ROUTINE 


a 
$053 
$2 FSB BNE oe 
9056 is 904737 O466565 
an ie Be 
$059 016746 134014 
S061 o4s2e04 104402 
See por: 
Se Ree tee Bi 
S065 32 
Stes Me me 
$059 737 OS5164e 
of tes fue BS 
n05 045254 013737 001474 
001500 
oe Ree Hae ite 
3077 045302 aesees ba0003 
ae ESTE 2667 000002 
3080 14 
Bs ee ee 
3 FSS IEE en 
sb 045334 16746 134244 
O4S340 104402 
Se bes te iat 
$091 104402 
oe fans te Bibs 
3094 16271 
Be ere EE cw 
ones peace 16746 133572 
9099 eae 104402 
91 10 1 001327 
8 BS Pcie 
HE G8 Be coor 
9105 045430 001551 
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3% 5 RT THE F INTED TO BY DATA 
:# Fea TO FLOATING WOOUBLE BORAT AND TYPE 
 seUSUOERORUDEASEOSOREALESSSSRSEOSSEEESUASOSSASSESOREEEOEAEORS 


SERRTYP: SAVREG 
YPE SCRLF CARRIAGE RETURN” & “LINE FEED” 
JSR PC aNTYPTIME tho Ty TIME 
TY ,M5G3 
TY "CRLF 
MOV SERRPC,-(SP)  ;;SAVE SERRPC FOR TYPEOUT 
ae THE VIRTUAL 


PC 
weer YPE--OCTAL ASCII(ALL DIGITS) 





YPE 8S 
MOV deVADR s SAVE VADR 
001474 MOV Areca aaVADR *SAVE THE VIR PC FOR CONVERSION 
001216 CMPB th aasItEMe 
BLE cis’ 
TSTB 4 deSITEMB sERROR ZERO? 
BNE 425 :BRANCH IF NO 
Sis: JSR PC, JSCNVADR :CONVERT TO 22 BITS 
HOV RO; J#VADR 
001476 42S: MOV JeVAOR, J#PALSCO 
CLR aePA2iis 
MOV RO, as 
41$: MOV #PA1SO0. -(SP) PUT RODRESS OFPC ON STACK 
ISR PC, a#SDB20 *CONVERT TO ASCIT 
ADD #3, (SP) :GET RID OF 3 MS DIGITS 
MOV (SP)+, 308 ; SAVE POINTER TO ASCII 
TYPE TYPE IT 
30$:  .WORD 
TYPE 8 
MOV 30(SP),-(SP) sGET PSW AT TIME OF ERROR 
TYPOC :TYPE IT 
TYPE BS 
MOV $MAINT, -(SP) 33 SAVE SHAINT FOR TyPEOUT | 
He TYPE THe HE MA NTENAN GE REG 
TyPOC ws G0 TYPE--OCTAL ASCII(ALL DIGITS) 
MO $TSTNM, -(SP) 
CLRB -1¢SP) 
TYPOC TYPE THE TEST NUMBER 
TYPE 2s 
MOV deSUBPASS, -(SP) 
SUB #60, (SP) 
TYPOC 
TYPE 8S 
MOV $PASssS, -(SP) ; SAVE $Pass FO FOR. TyPEOUT 
:: TYPE THE PA 
TYPOC it G0 TYPE-- e OCTBL COOOIT CALL DIGITS) 
TYPE SCRLF 
BISB deSITEMB,RO ;PICK UP THE INDEX 
BEQ 6$ EXIT IF ZERO 
1S: CMP #7,RO 51S THIS ERROR 7? 
BEQ 1s$ BRANCH IF YES 
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MAINDEC-11-DEQKC-B P 
QKCB.P1l 








MESSAGE TYPEOUT ROUTINE 


ERR 

nae 
3& 006300 

nes 


2 


" 


ee 


3 
8 


or 


: 


g 
3 


# 


o 
— 
fae 


a 
yar 


_ 
<= 


85 
< 
TU 


= 


R 


8 
i 


~ 
Tw 


8 
& 


an 
rT 


G 
3 


oO 
- 
GJ 
- 
a 


g 


8 
5 


A 


: 


SF 


No 





: 


eo 


DEC RO ;;ADJUST THE INDEX SO THAT IT WILL 
ASL RO He WORK FOR THE ERROR TABLE 
ASL RO 
ast RO 
AD #SERRTB, RO FORM TABLE POINTER 
MOV (RO)+, 2$ } PICKUP “ERROR MESSAGE POINTER 
Q 33 ::SKIP TYPEOUT IF NO POINTER 
YPE 2: TY THES“ERROR NESSAGE™ 
23: .WORD 0 :;"ERROR MESSAGE” POINTER GOES HERE 
z TYPE SCRLF "CARRIAGE RETURN” & “LINE FEED” 
3f: MOV tRO)+, 45 ;;PICKUP “DATA HEADER” POINTER 
BEQ 53 5 sSKIP TYPEOUT BG 0 
TYPE TYPE THE “DAT 
4§: .WORD 0 *:"DATA HEADER™ POINTER GOES. HERE 
TYPE SCRLF "CARRIAGE RETURN” & FEED" 
Ss: MOV tRO)+,R1 ; ICKU soatA INE POINTER 
7$ Go Type’ THE 
6$ RESREG 
TYPE SCRLF ss "GRRRIAGE RETURN” & “LINE FEED” 
RTS p : {RETURN 
7$: MOV (RO), Re :GET “DATA FORMAT” POINTER 
10$:  CMPB tl (R2) *DATA FORMAT 1? 
BEQ :BRANCH IF YES 
CMPB so, (R2) *DATA FORMAT 2? 
BEQ 118 :BRANCH IF YES 
CMPBs«#3, (R2) :DATA FORMAT 3? 
BEQ 24$ “BRANCH IF YES 
CMPB Eso#4,, (R) :DATA FORMAT 4? 
BEQ 4o$ *BRANCH IF YES 
CHP 5 (Re) "DATA FORMAT 5? 


‘BRANCH IF YES 
jSHHENOSSAROEEREEEERELLEEEUEEEEDEEEREOEEEEREREEEEEEEREEEEEEENE : 


iba 
s INCREMENT FORMAT POINTER 
MOV. @(R1)+,-(SP)  ;PUSH DATA TO BE TYPED 


13S: TST (Ri) ;ANY MORE DATA? 
BEQ 6$ ;BRANCH IF NO 
TYPE 8$ ; TYPE TWO SPACES 


hy TA ees te ents 2 fet enna pe amma emer t bate 
8s: MENT FORMAT POINTER 
$8 BE aecnvaor HEY ee BI T ABR 


14$: MOV #PA1500, -(SP) SH ADR OF 22 BIT ADR 
JSR PC, a8$D820 SCORVERT TO ASCII 
ADD #3, (SP) *DELETE LEADING ZEROS 
MOV (SP)+, 128 GET ADR OF ASCII STRING 





12S: - WORD 
Ri ; INCREMENT Rl 





s KELKAKEAAALALAL ALA LALA LARA LE LARS ARERR LERERAL ALLL LALA LE LARAEAAEE 


jbara FORMAT 2 
Lis Inc R2 ; INCREMENT FORMAT POINTER 

























o4s64e 


tes 


| eel ote ae Sn ee ee ed 


HSSESREEER 8 
fa 
pe it 





O— = f= 6 + F-5  -e BH oH pe 


WDOODOO DODO NDODOODODUDDOODVDNOUVJONOWDUNNOOWNDWOWWWWWW 


BO 0 & 9 BO 8 = 9 Fs 2 = 0 0 Ps fe Ps Pa ee pe 





SHIVA LOG SSSQRRZSHHB sao san 





SSSI 


NOUS Wue- 





sie 





88:88 





Be ee ee 


ERROR MESSAGE TYPEOUT ROUTINE 


Be 


ooSe0e 
913167 


001476 
001500 


000016 
310 
0004 


000002 


900002 


053610 
000002 


He St Raaeaa - POP 11/70 CPU EXERCISOR 


000910 
000002 
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MOV (RO)+, J#PAISOO 
MOV (RO), dePAZIIG 
BR 14$ 


Caimi 


ifare 
2 ; INCREMENT FORMAT POINTER 
MOV a(R1)+,25$ “GET DEVICE ID 
ADD #MSGINX, 25S “FORM ADR OF ASCIZ ADR 
MOV d25$, 25$ GET ADR OF ASCIZ 
TYPE 
25$:  .WORD 


NTINUE 
1" gamppuanay aetaeaanainanmneenss 2 
T4 


ios INC R2 
MOV (R1)+, 44S ;GET ADDRESS OF DATA 
cae FLeO :CONVERT TO FLOATING FORMAT 
MOV (SP)+, 45S GET ADDRESS OF ASCIZ STRING 
TYPE ‘TYPE THE DATA 
4S$: 
ee tne A ee ee ee 
ips. INC R2 ; INCREMENT FORMAT POINTER 
MOV (R1)+,61$ GET ADDRESS OF DATA 
ce FLD20 *CONVERT TO FLOATING ASCIZ 
MOV (SP)+, 625 ;GET_ADDRESS OF ASCIZ STRING 
TYPE :TYPE THE DATA 
625: 135 
UEEHHEHHE HEHEHE HHH HEB HEEB HEHEHE SHE HEEB HEHE 
tERROR 7 DECODE 
iss: mov sSAVE R3 
ADD REAR NX RO GEN ADRS OF ASCIZ 
MOV (RO), 16$ 
TYPE 
16$: § .WORD 
TYPE 65S ;;TYPE ASCIZ STRING 
BR 4g ::GET OVER THE ASCIZ ( 
jagss: -ASCIZ /FAILED/<CRLF> : 
MOV R3, RO sSAVE DEVICE ID 
CMP #10,R0 *MASS BUS DEVICE? 
BLE 7s “BRANCH IF YES 
E 12 
BR 193 


mae 


“MASS BUS E 
175: MP #20,R3 MBT ERR 
BEQ 26S > BRANCH i eT ERROR 
T 275 *BRANCH IF UBE ERROR 
YPE MSG13 
CMP hie 2,RO sWAS IT RS? 
BNE “BRANCH IF NO 
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BEOREE Pade ERROR MESSAGE TYPE SET BSOTINE — 


; i ; PEERESSEESHEESERESES OS SSERELSEESRERSESS ES SSS SRE SSE EESEDEODS 
gy IBUS Bod OR OR 8504 ERR 


ue a nov cs ser ET AOR OF REG TA 

3 { ie 4 i % RPO} 

ee 000007 HOV a7,R4 :SET SOB COUNT 

1 00006 208: HOV 86,4 ;SET RKOS SOB COUNT 

000011 218: HOV 811,R4 ;SET RSO4Y SOB COUNT 
SSEREFELSFSFSASSSAESALELELASHESSSSLA SLE LERESESSSASRESEESSSELSLLSSS 


12704 1 MOV $11 ;SET MBT SOB COUNT 
4 26s ADD GINX, RO 
A HOV (RO), RO 057 ADR OF Net TABLE 
UNIBUS EXERCISER ERROR bed: — 
em es eat” 
? pe 2e¢ 165 Yet toe GISTERS 
0 225: MOV @(RO)+, -(SP) bata IN REG 
046430 TYPE 8$ it SPACES 
S08 RY, 228 5CON 
‘HITS CODE TYPES A PHYSICAL BUS ess ts THe *ERROR WAS aN N RPO, RKOS, OR UBE 
022703 CMP = #22, R3 USE , 
00 BEG 738 ;BRANCH IF VES 
82,R3 *RKOS? 
BL *BRANCH IF NOT RK OR RPO3 
*BRANCH IF RPO3 


;GET ADR OF ADR OF RKCS REG 


012700 oat $05: MOV —s-#RP3CS, RO ;GET ADR OF ADR OF RP3CS REG 


GET, CALCULATE, 8 PHYSICAL ADDRESS 
18: 1) es ADR EXTENDED BITS 


~“P 
~ 
ae 
-~4 
—e@) 
- 
~o 
mer 
oo 
= 
xz 
os 


GET BUS ADRESS THAT FAILED 
iat Aarne wie 
‘DEC BUS AOR 

;G0 CONVERT TO 22 BIT PHYSICAL 


;CONVERT TO ASCIZ STRING 
;GET RID OF LEADING ZEROS 


001672 74S: 


See 
a 
2 
nee 


Z 
<= 
g 


eg NR RRRNNE DRO SERENPEERCERnERnOCnoCnetReR F 
a 

ZSGBEs 

B25% 

u 


RRRGnCAREe OG (22 CSEee ERGREEE 7022 BFF 
a 
RS 
3 
Juz 
te 


8 











ee 
: 
eS 
5 
= 
= 
Es 
se 
= 
eS 
a 
$310 
ei 
3 
$315 
i 
ai 
9329 
es 
eS 
ee 
=, 
9329 


Ht a lhe 





nau 
: 


SS 
: 


CPU _EXERCISOR 


es SORE 


x 

er 

: tas Bae 
Peal tas 

fee 

D464: 

0464 
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TYPEOUT ROUTINE ° 
cc CRLF 
T wee VIRTUAL. & Ss = 
533) Tet #2, 0 GET ROR OF UBE TABLE +2 
nov a + geRRRER t Bee aris PM 
tae scene GFF ADR BITS 


;GO CONVERT & TYPE PHYSICAL ADR 
serassEhscesns theeeesanenendSS MEETS TOE, PSICRL, 608 


'AEOW ERROR 
295: — ADD SREGINX, RO 
HOV (RO) RO sFORM ADR OF RPOY TABLE 
31$: MOV a(RO)+, (SP) iat Bare TO BE TYPED 
TYPOC mn ;TYPE CATA 
oop RY, 31 contnat 
TYPE nse 
TYPE SCRLF 
MOV b4 RY ;SET SOB COUNT 
TYPE ~_,M5G14 
SOS: MOV 3(RO)+,-(SP) GET oa TO BE TYPED 
TYPOC TYPE IT 
TYPE ag 
308 R450 ; CONTINUE 
8S: sASCIZ 7 / 3;TWO(2) SPACES 
EVEN 


Petitiititiittiriittiitititiiiiitiritititiititttiiiiteriitir tis 
-SBTTL TYPE ROUTINE 


fat ee aE Ine WI Arcee es ee ee PER A LINE FEED 

Sa ROS Ma OEE AM Reaee a gece te TE Dicer 
t eNOTES: SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED 

j HNOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 

>#CALL: 

*#1) USING A TRAP INSTRUCTION 

it TYPE  ,MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
+i 

Rin 

#2) USING A JSR INSTRUCTION 

* MOV PS, -(SP) 3;PUSH PROCESSOR STATUS WORD ON THE STACK 

3% JSR PC, STYPE “CALL TYPE ROUTINE 

+i MESADOR eT T ADRESS OF MESSAGE 


TYPE: TSTB  STPFLG 31S THERE A TERMINAL? 
tht BPL 1$ °:BR IF YES 











DE OK 






e 
| 


NAINDEC-11-DEQKC-8 POP 1 
-Pil TYPE ROU 


55 


Bin: Se 





Le CPU EXERCISOR 


MACY! 27(732) 
HALT 
BR 3 
MOV. getsprne 
MOVB Ease te ) 
me 
mov ¢8P)3.RO 
B00 atts) 
R 
CMPB os BHT, (SP) 
BEG 8S 
CMPB ACRLF, (SP) 
ae (SP)+ 
TYPE SCRLF 
BR 2$ 
JSR PC. $T 
CMPB 0s SF LLC, (SP)+ 
BNE 2s 
MOV $NULL, -(SP) 
ei (SP) 

PC, STYPEC 
pecs 3 


;;HORIZONTAL TAB PROCESSOR 


MOVB 
9S: JSR 
BITB 
BNE 
TST 
STYPEC: of 
S 
BPL 
MOVB 
CMPB 
C 
BR 
18: ee 
SCHARCNT: 
STYPEX: RTS 


AND T 





(SP) 
Bo, $TYPEC 
#7, SCHARCNT 
(SP)+ 
BNOTYPE 


3S) asTPE 
scr, 2tSP) 


SCHARCNT 
aL EUSP ) 


to f iy 
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Hea HERE IF NO TERMINAL 


ime Pe 0 Be Frey ONTO STACK 


BR IF IT ISN’T THE TERMINA 
HIE TERMINATOR POP IT OFF THe STACK 


STORE RO 
i aG]UST eT RETURN PC 
BRANCH IF <HT> 
;;BRANCH IF NOT 
3;POP <CR><LF> EQUIV 


10 BE TYPED? 
THE NULL OFF OF STACK 


$ DON'T COUNT THE NULL AS A CHARACTER 
$9 


;;REPLACE TAB WITH SPACE 
33 TYPE A SPACE 
+e STOP NOT AT 


; POP OFF STACK 
°GET CHARAC 

iy INMrerT TYPING? 

PHAIT Sear id eEEnTeR IS READY 

$3000 cane TO BE TYPED INTO DATA REG. 

3 3NOT <CR> 

exit 


;;BRANCH IF 
33 <LF> 


a 


MTD TYPE THE ELOPSED RUN TIME OF THE PROGRAM 


att hil ROUTINE TO 
i THIS an 
AND “MT ons “ele SET ORS 
HEM IN THE FOLLOWING F 





OF 
LOCATIONS “LTICKS” 


ONINUT anes RESPECTIVELY 





E15 





ob 

se 

oe 

oe 

> 

o® 

+ 

* 

oe 

+ 

a 

ee 

*. 

a 

¢ & 
t ~~ 
qo x OF 
w £33 
e 8S 

x -2 

x -— 
eo ina 
Y § oe 
i= ] * 
= * = 

; 
"od owes 
4 
7 38 
OF 
28 wk o3 
-2 ¢s 95 
EE SS 
ae £2 282 
oe 
= ei 
> * 
2= = 
+. 

: 
2 £2 

Ay 
Q ad 
ik = 
a 
ga 
cite 


DeGKee.PLL ROUTINE 10 TYPE 7 





;GET MINUTE COUNT 


oo oe 
ar 


seceeeecse 


T_ HOURS MINUTES 
E RENRINDER ACI 
;PUT IN BUFFER 


. +c 
- 


secees 


sheccaSanretancatasns 


z 


ae Bee Eee a Bee 
83 882 8828 888 888 


aa 
PAPeROOORROR TREE SEEES 


ern) 
27a 


? 
22 


_ [ae 
. be 
~- 


Sdaee 


ee: 


“ — ae 
“oOWnooes 
eeure = sa 


an 


4 

o ae 

.« & oe - 

Geesarure « 
ssc 28 


SuRseng 


i=) 
: 


;GO0 BACK TO ORIGINAL MEMORY 


. ke 


songit tates 


pete tata 
eal 


1,1,1,72,1,1,72,60,60,0 


: 


as3 


sa3 


ee ee 
Ee ae = = SN a = = S 


DOSS UDR DOEEEEE eC eeEeeeree 


88552" 


fa hen hen ban ben ben! 
KeRene 


65666606660684858248458484 


O-UM TiN. oo 
on hen bonkon dee ten bos bonton tens 


FFTTTTTTTS 





Paspeee 





PEEP EPP PP ET 
FEFTETTFES 


EVEN 


£ p RERALSLAAALA LAA LARL EAE RARL LALA RAE RA LARA RELA REAR RARER REE RRREES 


3 














F15 
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DEQKCB.P1l ROUTINE 


3 
8 
4 
1 


ce 
ae E 


PERE CEER ELIE 


Ga2 bs be bane f 2 fine fins Po hes fp fe Be 


SFTELHSEFSSAERRV 


: 


et 

71 

047176 116102 ta 
P7506 

047210 1 

OW7ele 1 047232 
047216 005267 000010 
oY 04400 001327 
Da7es0 0074 

047232 000 os4 
047235 000 


ERERFRMRR UA aaaacaaauaipiruuer es et es: 


SSB SRRIERERS 


2 


SRREER 


040 


YPE THE AVAILABLE DEVICES AND UNIT NUMBERS 


 SBTTL ROUTINE TO TYPE THE AVAILABLE DEVICES AND UNIT NUMBERS 


;3 THIS ROUTINE SEpR RCHES. THE SYST SYSTEM 134 ET GeLE FOR NON ae 
*# FEOF AND Fie NIT NUMBERS TH ar WERE EB unD fe Oe 
iH AVAILABLE FOR THAT DEVICE. 
eERESPSEELSELSELET SL LXSERERSRE SESSLER EGE SE SESELEE SL REL TES SELELES 
Hpsiz: I » SHITCH 
HOV iis, RO ;SET SOB COUNT 
1S: TSTB SYSSIZE(R1) sDEVICE AVAILABLE? 
BNE 2S *BRANCH IF YES 
7% ADD #2,R1 * INCREMENT INDEX 
OB RO, 1S : CONTINUE 
TS PC * RETURN 
23: MOV R1,R2 *GET INDEX 
ADD #MSGINX, Re *GET ADR OF MESSAGE ADR 
HOV (R2), 3$ GET ADDRESS OF MESSAGE 
3S: WORD 
MOVB =: #60, 45 sINIT UNIT NO. BUFFER (ASCII) 
MOVB SYSSIZE(R1),R2 ;GET WORD WITH AVAILABLE UNITS 
MOV #10,R3 “SET SOB COUNT 
6S: ROR R2 GET UNITS 
BCC $ *BRANCH IF NOT A UNIT 
TYPE 4s, 
cS: INC ag | 
S08 R3, 6S ; CONTINUE 
TYPE SCRLF 
45: -BYTE 0,54,40,0 ; NUMBER, COMMA, SPACE, TERMINATOR 


5 NEE 9 9 9 SE SE A EEE EEE 
-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
;*THIS Ro IS pi CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 


*#OCTAL ( TYPE IT. 
{EBT POS-—-ENTER HERE 10's SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
+i MOV NUM, -(SP) ; ;NUMBER TO TYPED 

2% TYPOS :;CALL FOR TYPEOUT 

+ -BYTE N ;;N21 TO & FOR NUMBER OF DIGITS TO TYPE 

rf -BYTE MM :;M=1 0 

8 3; 1=TYPE LEADING ZEROS 

iH ;;0=SUPPRESS LEADING ZEROS 


; #STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
j #STYPOS OR STYPOC 


MOV -(SP) 0 BE TYPED 
is TYPON 7, ie ALE FOR TYPEOUT 

ate ones HERE FOR sii OF A 16, BIT NUMBER 
+i MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
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94398 | 3% ;;CALL FOR TYPEOUT 
Gives lleeee Goouo! coca * SOPitL  }]LOAD-ZERO FILL SWITCH 
6 


LABIEEY Rertls adores 
Dooode O0168 HGET Fon Stxce) biciTs 
S331 THE ITERATION COUNT 
b GET THE NUMBER OF DIGITS To TYPE 
;;SUBTRACT IT FOR MAX. ALLOWED 


3;SAVE_IT FOR 
*:GET THE ZERO FILL SWITCH 
THE INPUT NUMBER 


u 
- 
ae 


aS 


2) 


SILSLALLIPILF 


raat 


BESS RSNSRAOR 
Fee 
SPR PeRPATS. 


ae 


ARARRAIRAS 
MONON £ WHO 
BREESE 


B 
BRRARALRS 


oo5e 
Ba 


ae 
SERRS2 
23 
LL 


8 

B 

re 

“2URS 
a 


a 


oe 


nieaat = 


Bee ; 


ee R3 
23SET THE STACK FOR RETURNING 


+ TURNS FOR ASCII DIGIT 

t TRNINATOR FOR TYPE ROUTINE 
SOCTAL DIGIT COUNTER 

$$ ZERO FI T 


; R IGITS TQ TYPE 
JHE HEHEHE HEHEHE HE 


=] + 
pos bem Bs bo Qs -\= 
Besse 
— — ey ee 
metas 

- 
Be 
— 


UE EPS SS Seep 


oo0e0o «“-M--- 


ii 
Basaeeh 


21 
so23 
ee55 
7 
3528 
$50 
ss2 
en 
9535 
37 
3 
9540 
ei 
aH 
sue 
9547 
eu8 
51 
$55 
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DEQKCB.P1l CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


~SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


;#THIS ROUTINE iS 44 10 ee a if eit INARY NUMBER TO A mM 


sso iGe ec (ASCI TYPE IT. DEPENDING ON WHETHER THE 
OSITIVE neon Ve A AA SPACE OR A MINUS SIGN WILL BE TYPED 
ae , we) a THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
REPL 





9555 
961 
gobs NUM, -(SP) ; PUT INARY NUMBER ON THE STACK 
3563 it ebDs 2:60 TO ROUTINE 
gore Pusues 100% STYPOS: vy RO, =(SP) PUSH RO ON ST 
9567 O47466 010146 MOV RT (ep) PUSH RI ON STACK 
8568 047470 b10e46 MOV Re, -(SP) >:PUSH Re ON ST 
9569 047472 010346 MOV R3,-(SP) >:PUSH R3 ON ST 
8570 047474 O10S46 MOV RS; -(5P) : PUSH RS ON ST 
9571 047476 ot 020200 HOV #20200, = (SP) 55ST BLANK at TGH AND SIGN 
3255 a 0 een _— EPL | pe iB iF eur IS POS. pe 
gop pavers woe oo00ss 000001 ae HOVE a7 CSP) Rex THE ASCLT MIREER Ye ER NES: 
e98 Rese ieee 047700 : HOV #S0BLKR3 HSETue TH Tre GUTPUY PO} NTER ae oe 
Ee tires 016001 047670 st cov pe RI CLE A ive Bob Be) ‘tire 
gee rng 160108 3S: SUB RL RS 7 s FORM THIS BED ADIGIT 
ee gosete INC R2 >: INCREASE THE BCD DIGIT BY 1 
See puvec 45 eR at RS ADD BACK THE CONSTAN 
355 ree0 toe7os ; TS Re’ HOMER IF BCD if ecb Blett=0. 
3588 ae 105716 aN (SP) HSTILL DOING DOING LEADING 0’S? 
coao rete ioeaiG ea (3) $iBR IF YES 
g 1 Bene 6 tt ee TF NO 
eo aire 11 HOVE = 1(SP) ,-1(R3) si VES--SET THE SIGN 
ean 7eb teste 10004 ate 8’ ‘Ro >:MAKE IT A SPACE IF NOT ALREADY Q DIGIT 
5595 MOVB Re, (R3)+ >:PUT THIS CHARACTER IN THE OUTPUT BUFFER 
95°35 TST (RO)+ 33 JUST INGRENENTING 
9597 Mt 000010 CMP RO, #10 CHECK THE T INDEX 
23 7614 BLT 2s $360 b0 THE NEXT DIGIT 
Fay oi oR” fe Re iGer TM LS, ASCII 
Sis biress ake eg ISTB (SP)+ ssHAS THE LSD THE FIRST NON-ZERO? 

ress 116k 177777. 177776 a nove cAiSP) ,-2(R3) ives-~set THE SIGN FOR TYPING 
soe Ze O10 MOV (88)4,R5 t Bop HE INT RS 
Se foes Ul my (elem nee Fim Ine 
9609 047646 pt Seh MOV (5P)+°RI tt pop STACK INTO RI 
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10 012600 CSP), RO $3POP STACK INTO RO 
et ot Sooa8e o00004 steey “yc sp) Abts THE état Mee 
12616 (SP)+) (SP) 
RTI 5 ;RETURN TO USER 


Were $DTBL: 
1750 
aan 


PRLRKRRK 
— bo hm 
OONWUIS Wr 


SDBLK: .BLKW 4 
fp RRRRRRERARE LALA LS AERA LLLLERAALELELAE RELL ERE RELA LEELALLSLALALER 


-SBTTL OOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 


;*#THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN 
on OCTAL ASCIZ NUMBER. 


#PNTR,-(SP) ;;POINTER TO LOW WORD OF BINARY NUMBER 


JSR PC, ax$0820 :CALL THE ROUT 
RETURN :: THE ADDRESS HE FIRST ASCIZ CHAR. IS ON THE STACK 


SAVREG 


Z 


STERS 
INTER TO LOW WORD 
DATA TABLE 
MOV TERS 
MOV 
CLR 
MOV 
DEC 
BGT 
BEQ 


Saasee 


PUT TER_IN DATA TABLE 
IS DIGIT 


PNA LOM DOs 


s 


nee 


MASK FOR THE LAST DIGIT 
BINARY NUMBER FOR 
XT OCTAL DIGIT 


e MEREEEESESIIN G22 
BPBPBPBS BS 
Fy 


o 

toe as 

£m -W 
oa: 


SOCTVL: .BLKB 4 es 
; TTTiittitiiititit titi tit tL 
-SBTTL SAVE AND RESTORE RO-RS ROUTINES 


: 

359 

oe 

a3 

oe35 

eae 

aca 

ea 

a] esas 
9648 002003 
arc 

9651 

ES 

eer 

een JS 

9661 

ae5 

aces 
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DEQKCB.P11 


es 
oe 
or 
Pe 
$3 
£5 


36 
9680 


Bess. 


PERE 
FOS 





The Gs Be Ge he P= Be Be Fe 


it 
+> 
et 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


os 
10 
20 
4 
50 
x 
“6 


: 
| 


t 


uti 


12666 
12665 
12666 
12666 
12605 
12604 
1 

1 

12601 
12600 
o0000e 


Sse Gnas GSES TNS TREES RRA ER ARORA EEE 
RRR 


OUTINES 


SSAVREG: 


5, RERRRRELALELAAALELALE LEAL LLALLELALA ALLELE LELALLELALLRELALRELELE 
‘SBTTL CONVERT FLOATING BINARY TO OCTAL ASCIZ 


ONVERTS A 32 BIT FLOATING NUMBER TO°AN OCTAL 
N THE FOLLOWING FORMAT: 


*#THIS ROUTINE 
s#ASCIZ STRING 


MACY1L1 27(732) 


;*#SAVE RO-RS 
; *#CALL: 


RURBRZBAZS 
| eee eS 


Cl el ae ae ee) ee ee) ee 


ABSSE2SEE28 Gi 
SOOSSSS8SS 
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3% SAVREG 
;#UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 


3% 
te +2---(41 
°% +h} 


BI 
EXPONENT (RIGH 


TON BITS <80:35) 














K1S 
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CONVERT FLOATING BINARY TO OCTAL ASCIZ 
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DEQKCB.P1l 


Eagate =materE oc i 
paitessuetes oF oo 


ust fe 


IT 
;PUT IT IN THE BUFFER 


3 Te 
STORE IN BUFF 
;SAVE RETURN PC 


fate FIRST 3 
;GET SIGN 


;MAKE IT 


THE CALL. 


z3 Be 
a8 : ‘ : 
“99.5 & ee i 
z 
Saati | oc & & 
a & BES oar or wu a= w 
E2gezee 82 OE : “a o 
Qa wns ia) - 
Segces 3 ace Sete = Seu a etn arte) rs 
yeas gti = piss SE0KE fF 
oi 
8 : 
Werewau 
z 


3, 


Ineio Bmeo Wntee. 2 
5Saeateo® ay F200 8, Eeee aS ta ar Ean Patt égc8 


Sie essust eo lwo Teor yseso eS Saige aie sigttlig 


inn 






s LELAAEALL LA LEAAFLLLLLEL LALLA LL ELELAERALELELLLELLLELAEERAE ALLELE 
ie 


1$ 


;*#IT IS ENTERED BY A TRAP ok WITH THE ADDRESS OF THE FLOATING 


;*NUMBER IN THE WORD FOLLOWI 
;#IT RETURNS WITH THE ADDRESS OF THE ASCIZ STRING ON THE STACK. 






beg ae & 

ee ae 
fe ee —— | 

HS eRe eRe PEER EERE REERER EERE REE EER EERE RE EOS SSO S SS 


fe Bae 
|| aa 
Te 
Me tos 
Sime 
177775 
a 
cE 
Bie 
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oso4le 016666 000004 
20 Ole766 001334 





000090 
ooo00e 


PERLE CLC RU RP RPRPeR Oren n rn ntr nn gy 





WebwWipwoepsowow 
ee ee ee ee ee eo re 
BDWNMWN£ WHO 





B SH GG 8S 





tri i sisi 
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MOV 
ey 


4(SP) ,2(SP) 


;AND RETUR 
8SFLBUFF,4(SP) 


N PSW 
put BUFFER ADDRESS ON STACK 
; RETURN 


REN 
HEHEHE HHE HEHEHE EEE HEHEHE EU HEHEHE bee 


“SBTTL CONVERT FLOATING DOUBLE BINARY TO OCTAL ASCIZ 
ieTurs ROUTINE CONVERTS A 64 BIT -FLOATING NUMBER TO AN OCTAL 


i we eee he Oe 


WHERE 


e1T IS eee Boe. BY A TRAP CALL 
; #NUMBER 


#ASCIZ STRING IN THE FOLLOWING F 


U VVV Wh XXXXXX YYYYYY 222222 


U = SIGN BIT 
V = 8-BIT EXPONENT (RIGHT JUSTIFIED) 
W = FRACTION BITS<S7:51> (RIGHT JUSTIFIED) 
X = FRACTION BITS <S0:35> 
Y = FRACTION BITS <34:19> 
Z = FRACTION BITS <18:03> 
WITH THE ADDRESS OF THE FLOATING 


FOLLOWING THE CALL. 


;#1T RETURNS WITH THE ADDRESS OF THE ASCIZ STRING ON THE STACK. 
5 HSE SESE SESE SE SE SESE EEE ESE SEE SESE SEE EEE SESE EEE EE EEE EEE EE EEE 


1S: 


a(SP),1$ GET ADDRESS OF DATA TO CONVERT 
#2, (SP) “ADJUST RETURN PC 

“CONVERT MS 32 BITS 
(SP)+, RO ;GET ADDRESS OF CONVERTED DATA 
RO, SBUFF VE 
#41 RO Ast TO END OF BUFFER 
-(RO) T TERMINATOR IN BUFFER 
1$,R1 T ADDRESS OF DATA TO CONVERT 
84°R1 Get ee TO LOWER 32 BITS 
(RL)+,R2 :SAVE THE DATA 
(R1)+,R3 
#2,R1 ;SET LOO COUNT 
#5,R4 T LOOP OUNT 
R3-RS GET GET LS 2.8 BITS OF DATA 
#t¢7_RS 
#60,R5 MAKE Bscri 
RS. -(RO) sPUT IN BUFFER 
#-3, Re *GET 3 BITS 
RY, 45 > CONTINUE 
R3.RS GET LS 32 BITS 
ett RS “ONLY WANT 1 BI 
#60,R5 *MAKE IT ASCII 
RS. -(RO) *PUT IN TABLE 
aH, = (RO) “PUT SPACE IN TABLE 
R1,3$ ;CONVERT NEXT 16 BITS 
(SP). (SP) ; T STACK 
4(SP}, 2(SP) TO RETURN WITH ADDRESS 
SBUFF,4(SP) sOF BUFFER ON STACK 

g 















a 
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CONVERT FLOATING DOUBLE BINARY TO OCTAL ASCIZ 


DEQKCB. P11 


9842 


FLELLLE LL ReReSPaRRELOL LE LoGLUD MEE uu es aE 





062700 
06270 


se 


By 
- 


- 
a 


000130 


000074 
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5p RRR RARER AREER ERA E ERE EE EERE EERE AL EERE EERE EARS LEAR REESE ERASE 
RANDOM NUMBER GENERATOR ROUTINE 
tte ROUTINE IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 


~SBTTL 


*WIT ? A RANGE OF 0 TO e(+33)-1. 


1S: 


* JSR 
RETURN 


mugidecessonsssomaee 


PC, SRAND 


RO, -(SP) 
R1;-(SP) 


PC 


;;CALL THE ROUTINE 

;;RETURN HERE THE RANDOM 

3 | NUMBER WILL BE IN 
SLONUM 


;;PUSH RO ON STACK 


SHIFT RO LEFT AND 
Heck F CARRY INTO Ri AND 
99 


INUE SHIFT LOOP 


$ aDD NUMBER TO MAKE X 129 


NTO he 
NTO R1 


we Bt in ha 
INE GENERATES TWO RANDOM FLOATING POINT 


PSYORED IN STRPO ARO $rH2. DOLE 


NUMBERS 
NGLE PRECISION 
E PRECISICN 


NUMBERS ARE STORED Nae STMPO_AND $ 
NGLE OR 


DOUBLE THE EXTENDED EXPONENT IS STORED 


2 EHHHH HHH HEHEHHB HEHE HHH HHGHHHB HEHEHE HRB HE GHGE EE 


°% 

*é5T TING POI 

HH NBs INGL 

i Rene 

iH IN EITHER SI 

+ IN $REGO AND SRE 

Ei TDBL: MOV #2, SOBDBL 

FLTSGL: MOV SOBDBL , RO 
MOV #STMPO, Re 

es: MOV #2,R 

1$: JSR PC, 
CMP #2;R1 
BEQ 3$ 

CMP #2, SOBDBL 

BEQ 4§ 

38: MOV SHINUM, R3 
BIC #177,R3 


WORD 
CET ADDRESS TO STORE WORDS IN 
SET NUMBER OF WORDS TO 2 

GET RANDOM NUMBER 

FIRST TIME? 

BRANCH IF YES 

; DOUBLE Rect ION? 


‘CHECK PPE OR INS ZERO 





MAINDEC=11-DEQKC-B POP 11/70 CPU EXERCISOR 
DEQKCB.P11 
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FLOATING POINT NUMBER GENERATOR 


SSN c oa Sew eeS 
RAAT 


BB83:0:0:8:0:08 


é 


3 


Seater ists 


RRRRRAAAAAR RGA RAG 
Se 
RENEE eS rs 


ef 


aie 





CMP #BIT15,R3 

BEQ 1$ ;BRANCH IF Sue ZERO 
4S: MOV HINUM, (Re)+ :SAVE HINU 

MOV LONUM, (Re)+ : SAV CONUM 





SOB R1,1$ : CONTINUE 
CONTINUE FOR DOU 


508 RO; 2$ BLE PREC 
MOV #STMPO,-(SP) PUT ADDRESS OF NUMBER ON STACK 
MOV #1002, -(SP) "PUT CONTROL WORD ON STACK 
CMP #2, SOBDBL ‘DOUBLE PREC? 
BNE o$ ;BRANCH IF NO 
MOV #1004, (SP) HANGE CONTROL WORD 
S$: JSR PC, EXPEXT :CALCULATE EXT EXPONENTS 
MOV a, * SOBDBL $ANTT socoet | FOR SINGLE PREC 


ys 1 
jaeevindaneneanh pesaceneeeaneanpeaneeunennennenanenncenneenteat 


“SBTTL FLOATING POINT EXPONENT uBXTENS ION 
THIS ROUTINE CONVERTS T ACTUAL EXPONENT oF A FLOATING POINT 
INTO AN AC 0 EXTENDED 


iS ach AN ACTUAL EXPONENT OF 200 AND AN 
* XPONENT EQUAL TOT THE DIFFERANCE BETWEEN THE ORIGINAL 
i ACTUAL EXPONENT AND 200. 
2 x THE ROUTINE IS ENTERED WITH A CONTROL WORD ON THE STACK. 
x BIT 15 OF THE CONTROL WORD INDICATES WHETHER THE NUMBER 
«i IS IN MEMORY (<15>=0) OR IN AN ACCUMULATOR (<15)=1). 
ie IF THE NUMBER IS IN AN ACCUMULATOR, BITS <9:8> INDICATE 
i THE ACCUMULATOR NUMBER. IF THE NUMBER(S) )I8 IN MEMORY 
2 x BITS <9:8> INDICATE THE NUMBER OF NUMBERS 0 CONVERT AND 
= BITS <2:0> INDICATE THE WORD LENGTH OF THE NUMBER(S). 
* IN THE CASE OF A MEMORY CONVERSION, THE ADDRESS OF THE 
:# FIRST WORD TO CONVERT IS ALSO ON THE STACK (PRECEDING 
3 THE CONTROL WORD). 
+ i-Sit llaaatt--} ¥it--eeiebieila+-1-i-- 11-bit 

EXPEXT- MOV (SP + RS s SAVE | RETU 

MOV (SP)+°RO ?GET CONTROL WORD 

BMI 1$ "BRANCH IF ACC CONVERSION 

MOV (SP)+.R1 ;GET START ADDRESS 

SUB #400, RO 

MOV #STMPO, R2 GET OFFSET FROM STMPO 

SUB R1,Re 

NEG R2 

ASR Re 

ADD #SREGO, Re iQEN RODRESS OF EXT WORD 
3S: MOV (RI) RS °GET 

BIC #100177,R3 :GET SPONENT 

ASH -7.R3 ‘RIGHT JUSTIFY EXPONENT 

SUB #200,R3 *CONVERT TO 2°S COMPLIMENT 

MOV R3, (Re jADD_TO EXTENDED EXPONENT 

BIC #77600, (R1) 

BIS #BITI4'(R1) “EXPONENT 200 

UB #400, RO *ANY MORE WORDS? 

BMI 2s :BRANCH IF 

HOVE RO,R3 ‘GET WORD LENGTH 

ADD R3,R1 SELECT NEXT NUMBER ADDRESS 

#2;R2 i SELECT NEXT EXTENDED ADDRESS 
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osi142 ; CONTINUE 
come oe 
114 is: ;GET ACCUMULATOR NUMBER 
ll : GENERATE 
11 SADDRESS OF 
il ee sEXT Tretia) 
1) $305 88" : NSTRUCTION 
1 8302 ; T 
1 S$: act 1 be 
1 , UR2) : ENDED EXPONENT 
835s 051 Bic oe ; TE INSTRUCTION 
9653 : 4 : BIS ep ae ; ‘ene 
at ieee 3 HOV Roy RE, ~(SP) Ms URN PC 
ss sSEESERESEREESE PELE ei 1 MME TAS islets oa 
.SSTTL POWER DOWN AND UP ROUTINES 
POWER DOWN ROUTINE 
1 : He F 
cei SLR GLE BRAS GRRE PO fo UL gare fo FST 
1 1 NOV «RO, =! 33PUSH RO ON STACK 
Rit ee eee 
1 *-(5P) 33 T 
ibs i MOY OR’ =(SP) t PUEH Ra ON STACK 
oe Bis: Se Selle 
ei 1 1274 00024 HOV SSPURUP, J8PWRVEC’:;SET UP VECTOR 
S378 SR -2 3;HANG UP 
9981 POWER UP ROUTINE 
1 : MOV SAVRE, ;;GET 
ce lem et pent eT oe son ne tv 
9se4 1304 1S Ing SAVRS ssuaIT OR THE INC 
5 1319 MOV (SP)+,RS t POP STACK NTO RS 
1314 MOV (5P)+°R4 *:POP STACK INTO RY 
| ae 1 MOV (38 3 3;POP STACK wry 
i MOV (SP)¢, >:POP STACK INT 
1 MOV (SP), RI >3;POP STACK NTO Ri 
| ei Sets SBS! Yate aumue!ahy THe POR pout vecTo 
1 MOV C+2 ;:PRIO: 
| 6994 051 TYPE POWER FAILURE 
| 9995 051 3 SPURMG: . WORD s FAIL Nes INTER 
' 1 1 MOV (PC)+, (SP) s;RES eT ote T 
i SPWRAD: gyro 3 ;RESTART ss 
1 : HALT s6 R TAR 
Pen an ORL SB See 
| 10001 051360 000000 SSAVRE: >:PUT THE SP HERE 
| 


De. - ee eee a = — - we eee ee 











beak 






0 6-2 & 0 0 & 2 B28 8-2 & 2 Bo 9-2 9 pp He pe 
== 9-= < 6-2 b= p02 po oo ( J - : 


= 
- 
i’ 


SOON 


{ 


- 
~- 
u 


b= &-2 & 2b 0 = O-0 b= 8 9 & 2 0 = b= 6 = 2 Fs 6 = = = HH PH = & + & 2H > © B= P= Hs pH 1 Ow 2 HH 


HUGG eer ey ee aean ne Ma iSiaih 
RR 


+29 


b-— po 


eb - op 
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“ei sol O47520 GNeSe? SPOWER: .WSCIZ <15><12>"POWER” 


- EVEN 
5 PERERERERSEEEREPEEREEEREEER: CESEPESEESSSSSSSESEEE REESE SEE FEE EES 
-SBTTL TRAP DECODER 


ROS 2 ise ih 2 ee tom 
+ 3e0 tOF THE DESIRED Roy sti USING ETE EO | 08 Aine IT WILL 


STRAP: MOV RO, -(SP) ;;SAVE_RO 
MOV 2(5P), RO #3S6T TRAE ss 
TST (RO) ; BACKUP BY 
oe STRPABTRO) RO $306 x BCR 
RTS Ht : + AO FO ROUT 


-SBTTL TRAP TABLE 
Sa he Stee ett ADDRESSES OF THE ROUTINES CALLED 


: ROUTINE 
StRPAO: CALL= TRAP+O(1904400) TTY TYPEOUT ROUTINE 
Sr ypsC TS TYPBC TRAPSECTPMMOS? | TYPE Orton Nopben (WITH LEADING ZEROS) 
TYPOS ::CALL=TYPOS TRAP+ ( 104408) ACTAL NUMBER (NO LEADING ZEROS) 
TYPON ;;CALL=TYPON (1 ) OCTAL NUMBER (AS PER LAST CALL) 
TYPOS ;CALL=TYPDS  TRAP+I0(1 19) CIMAL NUMBER (WITH SIGN) 
R jsCAlLssavReG = TRAPHLEC LONNIE) Sav ROUT! 
> CALL TRAPSIECT te — or 
exnnnne soe cunbi Seeese bbee a 


tu gf ie ioe ea ‘ 


Orne EXERCISER wreCis TERS. 


RELERLRELSREE 
jaeeaate tMOV  SUBESAY. R3 SUBESAV, R3 GET ADDRESS 
i+ : INITIALIZE 

CLR (R3)¢ 

CLR (R3) 
SET UP THE UBE AND Tent IT 

MOV ite SS OF UBE TABLE 

CLR a10c 

MOV @12(R2) ; VECTOR 


CHa? Te 


;UBE IS DOING BYTE TRANSFERS 








D 
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DEGKCS. P11 UNIBUS ROU 
1 1 1 MOV 83, -(SP) sPUT DEVICE ID IN STAC 
l 154 j ¥ MOV sda ABR <(SP) BOORESS OF PuySrchL BA ON STACK 
1 1510 | JSR PC, a8 REGISTE 
el Bis fies Bite mY Seepeesd Sad itt eth te bir 
: 15s Bba849 172516 BIS a0, 05h le 
10065 3 cen Reineseten nepesesecuensenscentensesssnenesey 
tees, 381 Foe Routt , 1gUs VIRTU ERTS Nts OF. OF eaTiOnes 
100e6 is THB ono Aan RA RTUAL 18-611 ADDRESS 
if 3 noe" RE uray Fe ait ts a Is EFoRED TN IN LOC 
ie +r “PAZII6" AND “PAISOO™. 
1 ‘ ©  EKELRSEERERESES = ~SSSSLFESAELLSSSLSLESHRARESALEA ERA RASHES SLAAHSES 
1pose pelese bra7ns 01672 ee og R3 (15:00> 
iors Oise Ol 1654 MOV SegRRBateoRe = GET BUS ADDRESS <iPsie> 
i i238 booed 172516 ett tits 1 Re * Map ON? 
1 1 1 BNE is’ ?BRANCH IF YES 
18 tet 1 001476 MOV R3, I8PALSOO :PHY ADR=BUS ADR 
19080 051 Sane 001500 HOV R2' d8PACLIG 
tet et i 1S: MOV Ra Re ;SAVE ADR BITS <15:00> 
10083 ine anos BSHC a3, Re jGET MAP REG SELECT BITS 
1p pet 1 BAD sMAPLO, Re FORM ADDRESS OF MAP REG 
10088 0516 1 001476 MOV (R2)+,a8PAISOO GET CONTENTS oF MAP REG LO 
1 1616 O11 001 MOV (Re), aePAZl16 GET C MAP REG HI 
iCoe8 1 1 BIC #1 FS >FORM PHYSICAL ADDRESS 
1 1 0014 RS, aePal >THAT TIMED OUT 
at Bie teary eee: aren OE 
1 1 000207 * RTS PC 
1po99 5g RARER Ab gR aE EEE EE EEE HE EE wD Rees 
10095 *SBTTL CONVERT A VIRTUAL ADDRESS TO 10.4 
100% i ze-brT Pasion MOORESS A “iggy epone ss. 10 a 
ifhae +i Se HED TO N ie The Fuvsica. 
19098 is ADDRESS IS PLACED IN ans _— “PAISOO". 
1010 i 
rift i Pen or BY SUBTRACTING pore rane 
its gait fre'pie ie Aas ee 
ie ii is NORCREL aa 
j i 
10108 2 T oteperare pas ee recisten 16 I GODED oF OFFER ASTUSTRENT) 
| 101 ia TO EL T SIGNIFICANT OF THE VIRTUAL ADORESS. 
int 10 o £ae “ectOvive CERT SiCnTF Tea 18 BITS OF Te VIRTUAL ORES. 
| 10112 O5ie42 104412 bivADR: SAVRE 
| 1012 OSiew4 Ol 001474 MOV BSVADR, R3 ;GET VIRTUAL ADDRESS TO CONVERT 
| 10113 OSiéso 205737 00is03 TSTB  asMMON 1S MEMORY MGMT ON? 
| 
L 





x | eee 
10114 1 
rr pe] 

1 118 0S1 
1011 1 
i Bie 
a ie 
le 1 
1 1 
i 1 
01 i712 
ft 1714 
1 1716 
He Bie 
ie 
te Bie 
ie 
Bt 051742 
01 
O01 
01 
a 
1 
0} 
O01 
01 


So Sees 


os 


es: 


iS 


_— 
-—O 


i 
pas pmo pas pmo 
Oorrnvw 


a 





- 


ane ViRTUAL ABORESS. 


OS2006 000114 


OS2640 000114 


177744 001302 


ae 
site 


177777 177744 
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;SRANCH IF NO 
Gg 


cT BrTS 


TO ORIGINAL 
REX Sune SIGN om EXTEND 


: FORM PHYSICAL ADDRESS 


; RETURN 
SELLAFLRSALAALALALELALLES 


Hie 3 Gest Data 


rue TO CHECK 


PARITY ERROR 


OCCURS 
A SPECIAL ERROR ES MESSAGE IS TYPED 
UNEXPECTED 1 
Lm Ht a, SHRELALERES 
SETUP PARITY VECTOR 
sCHECK DATA 


;COMPLEMENT DEST DATA 
‘1 CE 


SORE IF ALL DATA NOT CHECKED 


CK DATA 


sRESTORE CACHVEC 


;RETURN 


MACYL1 27(732) 
S TO A PHYSICAL ADDRESS 
eS 
ASHC 83 
ASH 8-3 
BIC #1 JR 
Bh 
SKIPARO, R2 
my get 
RSHC ae, RY 
ape BGS 
2s: MOV RY, DUPAZLIG 
MOV RS, J8PALSOO 
RESREG 
RTS PC 
1S: SUB DHFACTOR, R3 
CLR RY 
MOV R3,RS 
BR 2s 
33 JHEHHE HEHEHE EERE 
*SBTTL TO CHECK RE RELOCATED DATA 
;#ROUT In to se DATA 
io. i Hig 
3% RS= 
;# 
i THIS “i ay USES A COMPARE I 
* THE DATA THAT WAS RELOCATED. 
* DURING THIS CHECK 
ie INSTED OF 
SLELAERERKERAEBE 
MHKDAT: MOV 82S, J8CACHVEC 
CMP -(RO),-<Re) 
BNE 99$+2 
kon CRB) 
Ke (Re), (RO) 
BNE 99 
1S: CMP RO, RS 
BNE T 
MOV 8. PARSRV, a8CACHVEC 
RTS PC 
995: ae 
5 PC 
= AOV Ch eAR THe 
MOV Sean SegTnps 
MOV R2, JBVADR 
MOV RO, a8STMPO 
ERROR 5 
MOV 8-1, J8MEMERR 
BR 995 





; SAVE 
s SAVE 


ERROR REG 
ERROR ROR 


;CLEAR ERROR REG 
;RETURN 


fp RSRSRSLAESLALLALLA SEL EAA LLAA AA LAAL RELA AA ERLE RERE RRA RAE EEL ERELES 








RpelgTes. oats 


THAT 
, ICE REQUES 
THIS TABLE IS THEN SEARCHED TO SEE IF THE REGISTER 


Vv 


UR Be ICE 


BYTES, 


'IF THIS IS RK CALL, LOCK OUT UBE 
OR AUTO)? 
'FORM INDEX TO GET MAP REG ADDR 


;GET ADR OF PHY ADR 
ive aren PRIORITY 
; IT READY FOR RESTORE 


;GET DIVICE ID 


i 
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, (SP) 


4 


ICE ID 
3p) SRODRESS OF THE PHYSICAL ADDRESS 


4(SP) 


n raraue antes 


TINE TO GET A MAP REGISTER 
at 


= 
& 
& 
Z 
2 


THE MAP TABLE cnepreL) CONTAINS 4 
BYTE, MEN A REGISTER 18 AssiG 


MACY11 27(732) 


sFIHIS ROUT 


UNI 
4TH 


rer. tt eee et tt A 


BAe dos 26 8G & & 
Sie eee 


i STR BYBhe use 
Od a md Od Ed ed bed td 
ORONO OID DODD 
_ ad = -_ =—MUMTINOK@ ne n 
REARERENEE RANE RS BERTONE MADRE RABAT OAS REO =A AA Ae ANN 


OQOOOWWOWWOVWWWLYOVKOO0000000000000 
GD Dd Gd FG hd OG Oh Ed a A Gh Oh hd Od ed Od OG GO dd OE Rd Od dG Ed dd a HEE Gord ed 


ee ee 
wn wn 
Zz 4 


ROUTINE 


MAINDEC-11-DEQKC-B FOP 1 


DEQKCB.P12 








hey NOE CE} FOE OKC ene t6 Reto AXE EI ROR ee MACYL1 27(732) G16 10:6 PAGE 202 
10226 OS2ee6 
Ee 


062704 170200 ALD #MAPLO, RY : NERATE MAP 5S 
a R : IT NO. 
Ree ine mH, ae 
' 
1 essue $eas51 SUB 7 : : 
ies DE SESL Goseue 4 ge. nate DATA 
tov" 
iy BtB354 v (R4)+ : REGISTER 
pes 020000 ADD #20000, R1 AOD iK 
a ADC afm MAP P pata 
10124 MOV R1, (R4)+ 
C237 OS2265 010224 MOV *(R4)4 +P COND MAP REGISTER 
0238 104414 RESREG 
0239 pices? 177776 BIC (SP)+, JePSW PRIORITY TO ORIGINAL VALUE 
0240 11666 00004 MOV (SP). 4(SP) UP RETURN PC 
tes Geebee cnr (Sp), (SP)¢ :3 EON UP THE STACK 
024, “REGISTER PAIR IS IN USE, TRY ANOTHER RANDOM NUMBER 


So 
: 











1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
i 
10244 gs: ADD #4, Rl sRESTORE RI 
19245 l2 000137 052110 IMP ae2$ °GET ANOTHER RANDOM NUMBER 
sue 8 Se iso anal 6 Ie 
1 THIS ROUTINE T THE MAP TABLE 
et: ie FOR THe REOHES ? othe DEY DEVICE Ge AND REPLACES IT MITH 377 
10250 Veaueaanenunaneasteauiatensneaieaneeaienit “a pees 
10251 052316 010046 bivemap RO, -(SP) sSAVE RO 
1Oese 052320 16609 ooco04 ean ‘OV 4SP RO a RO) Ger DEVI a oo 
ines fesse} 015600 _— Ove tee )4,R0 HRESTORE RO a 
10cS 052334 RTS PC *RE 
10257 © REM EAEEGEAEEE EE EE EEEEEE EAA R EEE AEE EERE EE EE EEEEERE 
10258 =SETTL ROUTINE TO CLEAR ’T’ BIT 
1025S SELLRSESEAAKEKEER SRL SSERESES eAESHEELEA ER RE EEEREEE SESSLER SEEKER ES 
ines See teens Oiiee? — iderert: *AOy rt Spy techs CANE TH RETPSM SaELOM 
1 RETPSH: . 
10263 052346 042716 000020 BIC #20, (SP) *CLEAR T BIT IN PSW ON STACK 
ised s,prueeenneengeessesseceueunetesgesssneuscsssusseonsnsssenseyees 
OSE? 052360 Fn marr eer ape as TO ETI ahaa: 
‘= KX =. H _— . 
1 eae] RTT : BF ak ‘7? Bry IN PSW 
10268 052360 000207 1S: RTS PC * RETURN 
10271 2737 177400 177776 RESTPS: BIC #177400, 0#PSW  ;SET KERNEL MODE 
10e7e ead 1674% 177750 HOV RETPSH, ,-(SP)  $PUSH ORIG PSW ONTO STACK 
iter TT KEYBORRD INT: SERV ROUTINE Ne RARER REREEEES 
10677 saTHIS ROUTINE HANDLES INTERRUPTS FROM THE KEYBOARD 
10678 j STYPING A CONTROL ’C’ WILL CAUSE THE PROCESSOR TO HALT 
tra: ; 
10281 TYPING A CARRAGE RETURN WILL CAUSE A CARRIAGE RETURN-LINE FEED 
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11-DEQKC-B POP 11/ 
Pil NT SERV ROUTINE 


mia | 


a 


SECIS teenie iat 


= 


pee 
Oo 
~-_ 


s 


ATRL Ai At At Atalay ata, 
be 0 ee 
WOnNCU £WMHO 


: 


Bs 


SONOS 


mt 
at 
sin 





B 


Os pn bn ae ban be be Pn Be Bae ne Fe Be Hae en Pee Pe Dene Hae Hens Pens bt Pee ins One Hae He ene ae Pn Pe Pune ns Hane ne ras me Hens fens ne ms Ge ae Pune H-2 Pe =e Pao Pas Pas Papas Pow fue Pus pne 
= 


Saas 
8 


SSS 


370 BE TYPED. 


{ATYPING A CONTROL ’0’ WILL INHIBIT YY FURTHER TYPEOUT. THE SECOND CONTROL ’0’ 
#WILL ENABLE TYPEOUT AGAIN AND ECHO A CR-LF. 


te 
;*ANY OTHER CHARACTER WILL JUST BE ECHOED. 
5 HAE IE REHEARSE HEHEHE RHEE SESE HEHEHE HEE HE REE EE EE REE EAE EERE EEE ES 





NTRLC=3 
NTRLO=17 
TKISR: aSTKB, -(SP) 
ate #177600, (SP) Stee ON GRUSED BITS 
chp BCNTRLC, * (SP) BRANCH IF NOT TORTROL C (10) 
MOV 8SCRLF-1, 08SREGS ee CR LF 
ASRB aSTPS 
TST (SP)+ ;POP CHARACTER OFF THE STACK 
RTI s RETURN 
1S: CHP #15, (SP) sBRANCH IF NOT <CR> 
MOV #SCRLF-1, d8SREGS sECHO CR LF 
ASRB  aSTPS 
TST (SP)+ sPOP CHARACTEROFF STACK 
RTI * RETURN 
2s: CHP SCNTRLO, (SP) sBRANCH IF NOT CONTROL 0 (10) 
TST (SP)+ 
COM NOTYPE 
BMI 7§ 
MOV SSCRLF-1, 3#SREGS sECHO OR LF 
ASRB T 
7$ RTI 
3s SAVREG 
MOV (SP) ;RETRIEVE E_GHARACTER 
JSR OW C 
MOV JetKBFRP,RO GET BUFFER PTR 
4S: HOVE *LOAD CHAR INTO BFR 
CL (RO) *CLEAR NEXT LOC 
cS: chp STKBFR+20, RO ;BRANCH IF NOT END OF BFR 
MOV #TKBFR, RO ;RESET BUFFER PTR 
6S: MOV RO, J8TKBFRP “RESTORE BFR P 
JR PC; J#RESKT GO BACK TO ORIGINAL MEMORY 
ECHO: TST DSNOTYPE sTYPEOUT DISABLED? 
BPL 1$ “BRANCH IF NO 
S (SP)+ “FIX UP STACK 
CLR asTPS ic AR IE BIT 
1S: TSTB = ASTPS ;PRINTER READY? 
BPL 4 sBRANCH IF NO 












1tass pecene Te 126440 





ed 


el ee ee 





a 


ee 00iSe6 001270 


000114 
o000de 001276 


aaa 001474 
177740 


001306 


eco 
aa 
BER 
585 


rs 
% 


Ry 
e 


iT 
S 
a 


Soe Gone ceenie 
ae 


Ba2 B= Fa 2 Be fe be fe Be ht 8 he Be es han De hs Be ba pe hm Pe bs me be Ft he be 0 hn 8 Fs Oh = Ph hb Pn ho Bo Po ho ho he 


RRR 
8 





-O000 


: 
: 
: 


MAINDEC-11-DEQKC-B FOP 11/70 CPU EXERCISOR 
DEQKCB.P11 KEYBOARD INT SERV ROUTINE 


14-OCT-76 10:46 PAGE 204 





MACY11 27(732) 





MOVB (SP)}+,dSTPB ;MOVE CHAR TO PRINTER 
RTI ; RETURN 


3 isTTL TELETYPE INTERRUPT SERVICE ROUTINE 
*SBTTL INTERRUPT SERVICE ROU INE 
STHIS ROT ENE S A MESSAGE POINTED TO Y THE ADR STORED 
IN LOCATION SREGS. THIS ROUTINE IS INTE 
it iil ll sept ge sgt to ail 


thIsR aeSREGS sSTEP MESSAGE ADDRESS PT 
re (SP) 


@SREGS, - T_CHAR TO BE TYPED 
BNE ECHO G0 TYPE CHAR IF NOT ’O’ 
TST (SP)+ ;POP_STACK 
CLR aSTPS SCLEAR IE BIT 
MOV #NULLS, d#SREGS 
RTI ; RETURN 


g SREKEREEKEHRSS -HKAKEELEAA RARER KAAASLRAAKA RAE RL LER AAASTLHELASERE 
-SBTTL PAR ITY ERROR 


Hy on SRE "RES IL TSR 


Caan Beene Wea i 
i BAD Data, AppRess ie THe Can CAUSING THE CACHE TO GO 
f 19, NAIN BIN ReNORY TO GET THE THE DATA. QTA. THIS Re EVENTS a 
3% 1S T 
f Shee ine ear onan ee 
| ante oie ss POINTED 10 BY “SLPERR™ “st PeRR rere rerereter ett tt 
* PARSRV: MOV aT SECACHVEC ;PUT NEW ADDRESS IN PARITY VECTOR 

MOV 2(SP}. aasT : ERROR PSW 

HOV (SP) 2 >SAVE PC 

MOV a Re iGET ERROR REGISTER | 

MOV  @BLOADRS|R3 *GET LO ADDRESS ERROR -REG 

MOV = R3, aaST sPUT LOW ADR IN MEMORY 

MOV ADDRESS ERROR REG 


;MASK mask OFF CO TEN BITS 
He Reno naar on 

my ATA Suc ENSRE OE 6, RESIDE 
1S: at tha) : ees le eS TnAT TRA HRAPPED 


ase 

so- 

es 
a 


S 
ris 
z 
2 


es 
: 


2s: COM Re sGET ORIGI RERORY 
MOV Re, JUMEMERR sERROR REG DATA 

PERET: MOV SHHENERR, SaSTHPG $BEVE Loo ERROR REG FOR TYPEOUT 
MOV O#SLPERR, d#SREG SS 
MOV #2$, JUSLPERR ;SET RETURN ADDRESS IF LOOPING 
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MOV DHSREGY, IUSLPERR sRESTORE LOOP ADDRESS 

MOV R4, JSKIPARS ;RESTORE PARS 

A ogy RE a 

MOV 0-1 gan FERR vec : Am Bont fy VECTOR 

BIC #177763, R4 sCLEAR ALL BUT BITS 28 3 

SEQ 1 :BRANCH IF NOT MAIN MEMORY ERROR 

TYPE 65S +s TYPE ASCIZ STRING 

5R 4§ *:GET OVER THE ASCIZ 
igs: .ASCIZ /FATAL PARITY ERROR-RESTARTING/<CRLF> 

RESET ;CLEAR THE WORLD 

IMP aaSTART 
1$: MOV #X, (SP) sPuT ADDRESS ON STACK TO GET ORIGINAL 
RTl: = RTI GET PSW 
X: IMP QSLPERR > JUMP TO START OF TEST THAT HAD THE PE 
s3 PSTTTTTSTOTTTTTETIOTOTE TTT TTT TT TTT TTT TST TTT TT TT TTT ETT T TTT TTT TT 
"SBTTL CONTEXT SWITCH DOWN SUBROUTINE 
i TO 8 LOAD KIPAR’S 0.1. AND 2 (IF MEM MGMT ENABLED) 
* x THIS NE I BY THE KE INT T, LINE CLOCK 
+ INTERRUPT SERVICE ROUTINE, MBT SERVICE ROUTINE, AND TYPE TIME ROUTINE. 
es PPETETTSESES TONS STSSETTESTOTOLTS ESET CETSSTT TT TTT TET TST ET t TTT TS) 
LOKT: TSTB GENO sBRANCH IF MEM MGMT DISABLED 

MOV (SP)+,R4 : RETURN PC 

MOV DePSW: IkSSAVPSW ; THE CURRENT PSW 

BIC #140000,a8PSW ;GO TO KERNEL MODE 

MOV aK RO $ ADDRESS OF PARDO 

MOV ( * ral GET PARO 

MOV (RO)+,Re *GET PARI 

MOV (RO)+, GET PAR 

MOV #400, -(RO) ?RELOC BACK TO LOW CORE 

MOV #200; -(RO) 

CLR -(RO} 

MOV #$SAVPAR, RO :GET ADDRESS OF SAVE BUFFER 

MOV RL, (RO)+ “PUT PAR DATA IN MEMORY 

NOVO RSTCRODS 

MOV RY; -(SP) ;PUT RETURN PC ON STACK 
1S: RTS PC 


- SESGHEAESELEESLEETRRLEEEEREAEEEELEREREHEREREEEEEREEEEEELENEEES 

; tit FO RESTORE KI 1, AND 2 CIF MGMT ENABLED) 

ETETTETETET ESET TT TET TTT TET TS ST STTT ST ETT TST TTT STOTT OTeS TTT TT TT 
IF MEM MGMT DISABLED 


RESKT: TSTB § @&MMON : 
BEQ 1 
(SP)+.R4 GET RETURN PC 
VPAR, RO :GET SS OF SAVE BUFF 
(RO) + RL GET OLD DATA 
aK 


RELocaTE Back ne 
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MOV 
MOV sHshiess, aePSW 
nov SP) 


1$: RTS 

seavpar: -BLKK 3 

a sesenes . WORD 

Fart tt 1 aaa 


; T SUBROUTINE 
54-1 ppb triads tad tot-b-hot + aetna htt + tt 
ktaget: Mov 2(SP), aa$T 
MOV (SP), daVADR He ERROR PC 
SUB #2, a8VADR 
MOV ISMMRO, JUSTMPS SAVE MMRO 
MOV DaMMRe. JeSTMPS :SEVE Heme 
MOV S#SLPERR JeSREGH LOOP ADDRESS 
HOV a1 , MSSLPERR SET RETURN ADR IF LOOPING 
1S: JSSREGY, DUSLPERR sRESTORE LOOP ADR 
BIC #170000; J#MMRO :CLEAR ERRORS 
MOV JSSLPERR, (SP) Ger COP ADDRESS 
RTI RETURN 
: ARLESSGSRSRHLSELARGLES KS ELLRRRE RSH ERSRERSS Se SEBPREKERRER SSE 
Sart RESERVED INSTRUCTION ROUTINE 
LELKELLRSKRASEE BESSESEESRESSESENESESRUSSESEERSSSRSRRSSANS 
hicERR: MOV 2 is seven P) aeSTHPO PSW 
MOV : SAVE ERROR PC 
Ry Sathaoewecs giv oor a 
nov. a ee tS TERETURN AOR IF LOOPING - 
1S: fore SUSREGH, D¥SLPERR sRESTORE LOOP ADR 
MOV a , (SP) GET LOOP ADDRESS 
RTI * RETURN 
3 es ERPLLAEA SKA AHKESSLER RARE SLE AKG SERS E RHEE SK MAR RA LAMA SRE RA LEEK E LEAS 
"SBTTL TRAP TO 4 SERVICE ROUTINE 
+s SRERSRFESHRELSE ESE SUUSUSSUESRCEERSRESEESESE RESTS EES EERER REET ED 
ERPRT: MOV 2(SP). aeSTMPO 
MOV (SP), 3aVADR SAVE ERROR PC 
SUB BVADR 
MOV TK, SP sRESTORE SP 
MOV DECPUERR, aeSTMP2 GET ERROR REG 
MOV a J8SRE “SAVE LOOP ADR 
HOV a OSSLPERR :SET RETURN ADR IF LOOPING 
1S: HOV wSREGH QSSLPERR ;SET LOOP ADR 
V #STMPO,-(SP) | ;SETUP STACK TO RETURN 
MOV DESLPERR, -(SP) 
RTI ; RETURN 
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E REPRESENTS THE *NEW’ PSW SET BY THE PROGRAM ON 
FA A 


ee ce B MAY BE MODIFIED TO CAUSE THE PROGRAM TO 
PARAMETERS BY THE DESIRED pass. PAROMETER 


044020 :SUPERVISOR MODE, REG SET #1, T-BIT TRAPPING 


y Pat CHING IN 
iFOR Na cae CAUSE THE PROGRAM TO RUN WITHOUT SETTING THE ’T’ 
*IN ALL PASSES PATCH OUT THE ’T’ BIT IN THE TABLE. 
bara 000000 
000020 ey TRAPPING 
140000 R 
44 USER MODE REG SET #1, T-BIT TRAPPING 
40 sUSER VI 
: THE BELOW TABLE IS USED TO SET MEMORY MARGINS 
MRGTAB: .WORD O NO NS 
r 4 “EARLY STROBE 
.WORD 6 ;LATE STROBE 
.WORD 10 LOW DRIVE CURRENT 
WORD 0 310 MARGINS 
;MESSAGES 
EVEN 
REGINX: RP3DS 
RKDS 
. WORD 
~ WORD 
RPYCS1 
RSCS1 
. WORD 
WORD 
MSTTBL 
MSGINX Up MSGS 
WORD HeGe 
~WORD MSG21 
“ORD MSGe1 
a MSGIO 
.WORD MSG11 
“WORD MSG2l1 
.WORD MSG2l 
WORD MSGIS 
WORD MS 


s Ge4 
MSG1: <:ASCIZ <CRLF>*LOW LIM?’ 
MSG2: .ASCIZ ’HIGH LIM?’ 


ZERRORPC PHYSC PC PSW MAINT 








;HIGH DRIVE CURRENT 
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10670 '- 104 1 

IY BSI BRI BEI BES 
1 0551 

10673 055! 31 DH2:  .ASCIZ /PCOFTP PHYSPC PSw/ 

10674 0551 : 

pecs beet 

10677 EVEN 

10678 O55! “WORD © VAOR, VAOR, STMPO, 0 

i080 1 ; .ASCIZ /UNEXPECTED TRAP 10 2SO0(MGMT)/ 

ie fale 

me er he 

19685 Bee l .ASCIZ /PCOFTP PHYSPC PSW MMRO MMR2/ 
tess 

10688 

wie 

a ee 

ie OS5266 0014 DT3: [WORD VADR,VADR,STMPO, STMP2, STMP3,0 

10595 tessa8 EM4:  .ASCIZ /UNEXPECTED TRAP TO 114/ 

106 10 S21 

ee ie | 

10s DHY:  .ASCIZ /PCOFTP PHYSC PC PSH . ERRREG ERR ADR REG/ 
a 

1 55.352 

1 

t 

ite 

: OF¥: BYTE 0,1,0,0,2 

1g703 EMS:  .ASCIZ /PARITY ERROR DURING DATA CHECK/ 
10711 

10718 

ib7t | 

ie DHS:  .ASCIZ /SRCADR DSTADR EADRREG MEM ERR REG/ 
1 

10719 


OFS: -BYTE 0,1,2,0 


OTS: :WORD $TMPO,VADR,STMP3,STMP2,0 





Pm a sn ne rr rte 
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SOR 
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EME 
pTG: 
EM10 
003 OFI0: 
EM11: 
OF 
DT 
DHle: 
OF 12 
DTl2 
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O44S 
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gai 
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51 
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122 
047516 EMI3 
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156 026516 10S 05151 
T ! el 
1} 1 ° 

i DH13;_ «. /PHYS ADDRESS/ 


EMi4: =. /FLOATING POINT ERROR/ 


sscsssak 


Re 
a 
S= 


ONIN: DTATI 


dedesd 


OT14:  <:WORD STMPY, SREG2, STMP6, SREG3,0 
DFI4: 3. 4,0,4,0 

emis: . /DEVICE HUNG/ 

DHIE: / DATAL 


Da mo Cane Pe fens Ors P-0 Pn a> Be Baw Ho Pas Bw Gam Pew hat ne 


ciatewss (24 
ot 


& 
RE 
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me Rass 


OFi6: .BYTE 5S,0,5,0 


EVEN 
DTi6: .WORD FLTMPO,SREG2,FLTMP1, SREG3,0 
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10816 
10817 
1 
1 
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USE/<CRLF> 


HALT ON ERROR/<CRLF> 


RE 

eS 
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So 
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LOOP ON TEST/<CRLF> 


INHIBIT ERROR TYPEOUTS/<CRLF> 


pas G0 baa bas fae b> fe fs be fb 


SRORaR Sn 
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INHIBIT UBE/<CRLF> 


RRR 
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INHIBIT TYPEOUT OF THIS TEXT AND SYS SIZE/<CRLF> 


INHIBIT RELOCATION VIA 1/0 DEVICE?<CRLF> 
INHIBIT ROUND ROBIN RELOCATION/<CRLF> 


INHIBIT RANDOM DISK ADDRESS/<CRLF> 


INHIBIT ITTERATIONS/<CRLF> 
BELL ON ERROR/<CRLF> 

LOOP ON ERROR/<CRLF> 
INHIBIT RELOCATION/<CRLF> 
INHIBIT MBT/<CRLF> 

THESE THREE SWITCHES/<CRLF> 
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ARE ENCODED TO SELECT RELOCATION/<CRLF> 


ON THE FOLLOWING DEVICES: /<CRLF> 


0...RP11/RPO3?<CRLF> 


-— oO 

be ~ e-: 
~~ | on] | ml 
5 S 
‘2 # e 


-RK11/RKOS?<CRLF> 


-RH70/RPO4? <CRLF> 


5..-RH70/RSO4 OR RSO3?<CRLF> 


2...NOT USED?<CRLF> 
3...NOT USED?<CRLF> 


l.. 
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ASCIT 
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6...NOT USED?<CRLF> 
7...NOT USED?<CRLF> 
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DEQKCS.P11 CROSS REFERENCE TABLE -- USER 
ea pousns 17778 2236% 
aco = isose H * 7037 7039 704S* 704)  70SS* 7060 7066s 7068* 7083% 7097% 
Oe 71i0e lies 7118 7ibde 7126 7131e 71gae 7ie7e 7ie4e 7168 7193" «71978 
5 joins «9318 9354 725% «9536s 7557" «RES REE 7B7ER 7378s ; 
5597 e796 78008 731k 73ebe 73338 75237564 % 7309% 7407 
=”000001 S96 , 7031 1 7046% 70S6% 7071 * 7101 
lis, 71188 7121 71bee 7134 «71S6e «7lee 7182" «7187 «7200s 7208e «7210S 72S 
13, Zeese 7280 7eRex 7670 Zeya ene © Tee 7290 7295 $556" 9531 
=”p00002 1sa78 70418 7210% 7300 
=000003 1038 70508 
= 000004 12998 
“011208 1 uous 
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TORE eH: : 
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